Отправляет email-рассылки с помощью сервиса Sendsay

RFpro.ru: Программирование на Delphi и Lazarus

Подписаться Бесплатная «Золотая» новостная рассылка . Подписчиков 3.307 RSS
←   Февраль 2006   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
21.02.2006
10:44:51
15:43:48
22
23
24
25
26
27
28


За последние 60 дней ни разу не выходила


Сайт рассылки: http://rusfaq.ru/
Открыта: 14-03-2002

Автор
Калашников О.А.

Статистика

3.307 подписчиков
0 за неделю
←   Все выпуски   →

RusFAQ.ru: Программирование на Delphi


Информационный Канал Subscribe.Ru
РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Delphi

Выпуск № 372
от 01.02.2006, 03:48

Администратор:Калашников О.А.
В рассылке:Подписчиков: 247, Экспертов: 60
В номере:Вопросов: 5, Ответов: 11

Вопрос № 34126: Здравствуйте уважаемые эксперты! Как узнать Email установленный на компьютере по умолчанию средствами API? ...
Вопрос № 34127: Здравствуйте. Я использую Borland Delphi 6.0 и JVCL 2.10. Пытаюсь вставить картинку в JvRichEdit а он ругается: [Error] Unit1.pas(530): Undeclared identifier: 'BitmapToRTF' [Error] Unit1.pas(532): Undeclared identifier: 'StreamFormat'...
Вопрос № 34145: Здраствуй народ. Такой вопрос. Есть некая таблица (Paradox) с данными, происходит ее редактирование. У некоторого поля Field1 обрабатывается OnExit, что бы проверить уникальность введенного значения. Поиском Locate это легко сделать при добавлении но...
Вопрос № 34165: Подскажите пожалуйста, есть ли бесплатный компонент для Delphi, наподобие RichEdit, но с поддержкой рисунков (что бы можно было добавлять изображения)?...
Вопрос № 34173: Здравствуйте уважаемые эксперты! Как программно можно сделать бэкап реестра, в каую сторону копать?...

Вопрос № 34.126
Здравствуйте уважаемые эксперты!
Как узнать Email установленный на компьютере по умолчанию средствами API?
Отправлен: 26.01.2006, 05:39
Вопрос задал: LENinARmy (статус: Посетитель)
Всего ответов: 2
Мини-форум вопроса >>> (сообщений: 0)
Отвечает: nimoid
Здравствуйте, LENinARmy!
А это как? :-/
Может ты имеешь ввиду e-mail в какой-нибудь программе? Тогда нужно конкретно название программы - TheBat! или еще OutLook или еще какая-нибудь. Уточни плз.
---------
Пишем баги на любые патчи :-]
Ответ отправил: nimoid (статус: 7-ой класс)
Отправлен: 26.01.2006, 08:34
Отвечает: sir henry
Здравствуйте, LENinARmy!
На компьютере e-mail не устанавливают, ни по умолчанию, ни как-нибудь еще. Может быть Вы имели в виду имя компьютера? Уточните.
Ответ отправил: sir henry (статус: Академик)
Отправлен: 28.01.2006, 20:08

Вопрос № 34.127
Здравствуйте.
Я использую Borland Delphi 6.0 и JVCL 2.10.
Пытаюсь вставить картинку в JvRichEdit а он ругается:
[Error] Unit1.pas(530): Undeclared identifier: 'BitmapToRTF'
[Error] Unit1.pas(532): Undeclared identifier: 'StreamFormat'
[Error] Unit1.pas(532): Undeclared identifier: 'sfRichText'
[Error] Unit1.pas(533): Undeclared identifier: 'StreamMode'
[Error] Unit1.pas(533): Undeclared identifier: 'smSelection'
[Error] Unit1.pas(533): Undeclared identifier: 'smPlainRtf'

Далее привожу код (взят с сайта девелопера - http://homepages.borland.com/jedi/jedihelp/item.php?Id=140042)

procedure TForm1.Insertpicture1Click(Sender: TObject);
var
Bitmap: TBitmap;
Stream: TMemoryStream;
begin
Stream := TMemoryStream.Create;
if OpenPictureDialog1.Execute then
begin
Bitmap.LoadFromFile(OpenDialog1.FileName);
try
BitmapToRTF(Bitmap, Stream);
Stream.Position := 0;
JvRichEdit1.StreamFormat := sfRichText;
JvRichEdit1.StreamMode := [smSelection, smPlainRtf];
JvRichEdit1.Lines.LoadFromStream(Stream);
finally
Stream.Free;
end;
end;
end;

Такое ощущение, что просто не подключена какая-то библиотека.
Но может быть я и не прав.
Помогите плиз.
Отправлен: 26.01.2006, 05:44
Вопрос задал: Lakhtin Yuriy (статус: Посетитель)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 0)
Отвечает: Jadd
Здравствуйте, Lakhtin Yuriy!
Эти ошибки свидетельствуют, что в компоненте JvRichEdit отсутствуют перечисленные константы, переменные и методы. Проверь внимательно то ли ты пишешь и все ли модули подключены.
---------
Если в сердце дверь закрыта, нужно в печень постучаться
Ответ отправил: Jadd (статус: Специалист)
Отправлен: 26.01.2006, 08:53

Вопрос № 34.145
Здраствуй народ. Такой вопрос. Есть некая таблица (Paradox) с данными, происходит ее редактирование. У некоторого поля Field1 обрабатывается OnExit, что бы проверить уникальность введенного значения. Поиском Locate это легко сделать при добавлении новой записи. Но при изменении существующей записи, причем поле Field1 не меняется, при использовании Locate натыкаешь на редактируемую запись. Сканировать всю таблицу, исключая текующую запись - это кроваво. Можно как нибудь оптимизировать поиск?
Отправлен: 26.01.2006, 13:10
Вопрос задал: Карасев Алексей Александрович (статус: Посетитель)
Всего ответов: 4
Мини-форум вопроса >>> (сообщений: 1)
Отвечает: nimoid
Здравствуйте, Карасев Алексей Александрович!
Слушай, а ты когда добавляешь новую запись, ты разве не "кроваво" сканируешь всю таблицу? ;-)
При редактировании делай тот же самый алгоритм как и при добавлении новой записи, но с одним новым включением - пропиши еще одну строчку типа
if id_записи <> текущей_записи then begin ... end;
у тебя же есть идент у записей, так?

p.s. Хоть я в БД и не шибко варю, но лучшего варианта не знаю.
---------
Пишем баги на любые патчи :-]
Ответ отправил: nimoid (статус: 7-ой класс)
Отправлен: 26.01.2006, 18:40
Отвечает: Меркулов Алексей
Здравствуйте, Карасев Алексей Александрович! А создать индекс для этого поля с параметром Unique нельзя?
Ответ отправил: Меркулов Алексей (статус: 4-ый класс)
Отправлен: 26.01.2006, 23:06
Отвечает: Лучников Юрий Владимирович
Здравствуйте, Карасев Алексей Александрович!
Теоретические размышления:
Если Locale вас устраивает, то возможен такой вариант - при редактировании N-ой записи, вы запсываете в буфер ее значение, изменяете на любое другое, не равное текущему и применяетет Locale... ПОтом восстанавливаете прежнее.
Таким образом вы исключите из рассмотрения текущую запись.

Успехов!
Ответ отправил: Лучников Юрий Владимирович (статус: Студент)
Отправлен: 27.01.2006, 00:30
Отвечает: Kazakh
Здравствуйте, Карасев Алексей Александрович!
если я правильно понял вопрос, то нужно вместо OnExit использовать событие(я) OnBeforePost(OnBeforeInsert) у потомков TDataSet, ИМХО.
Ответ отправил: Kazakh (статус: 2-ой класс)
Отправлен: 27.01.2006, 06:39

Вопрос № 34.165
Подскажите пожалуйста, есть ли бесплатный компонент для Delphi, наподобие RichEdit, но с поддержкой рисунков (что бы можно было добавлять изображения)?
Отправлен: 26.01.2006, 18:21
Вопрос задал: Дружин Игорь Владимирович (статус: Посетитель)
Всего ответов: 2
Мини-форум вопроса >>> (сообщений: 0)
Отвечает: Меркулов Алексей
Здравствуйте, Дружин Игорь Владимирович! попробуйте RX Lib или JVCL 2.10.
Удачи!
Ответ отправил: Меркулов Алексей (статус: 4-ый класс)
Отправлен: 26.01.2006, 23:11
Оценка за ответ: 5
Комментарий оценки:
Спасибо! В RX Lib действительно есть что-то подобное. Захотел вот посмотреть что такое JVCL. Скачал эту большую библиотеку (версию 3.10), но не могу её установить. При запуске файла install.bat выдаётся следующее сообщение:
build.exe found. Pretest: ok
Using d7 for build process.

MAKE Version 5.2 Copyright (c) 1987, 1998 Inprise Corp.
[Generating MO files]
[Compiling: Installer]
MAKE Version 5.2 Copyright (c) 1987, 1998 Inprise Corp.
Writing: ....installJVCLInstallJVCLInstall.cfg
Borland Delphi Version 15.0
Copyright (c) 1983,2002 Borland Software Corporation
JVCLInstall.dpr(74) Fatal: File not found: 'JvGnugettext.dcu'
** error 1 ** deleting Installer_nomo
Press ENTER to continue

Может быть вы сможете мне помочь?
Отвечает: Лучников Юрий Владимирович
Здравствуйте, Дружин Игорь Владимирович!
Попробуйте поискать на крупнейшем портале: torry.net или visualcomponents.com

Успехов!
Ответ отправил: Лучников Юрий Владимирович (статус: Студент)
Отправлен: 27.01.2006, 00:32

Вопрос № 34.173
Здравствуйте уважаемые эксперты!
Как программно можно сделать бэкап реестра, в каую сторону копать?
Отправлен: 26.01.2006, 20:05
Вопрос задал: Dushin Igor (статус: 3-ий класс)
Всего ответов: 2
Мини-форум вопроса >>> (сообщений: 0)
Отвечает: Сергей Т.
Здравствуйте, Dushin Igor!
Попробуй Файл -> Експорт и выбери весь реестр.
Ответ отправил: Сергей Т. (статус: 2-ой класс)
Отправлен: 26.01.2006, 21:36
Оценка за ответ: 3
Комментарий оценки:
Неплохой вариант:)) Но мне нужно программно, тоесть из программы написаной на Delphi! Пожалуйста читайте внимательно вопрос!!!!
Отвечает: Schmak
Здравствуйте, Dushin Igor!
Класс Tregistry предназначен для работы с реестром. Только вот если надо бэкпить реестр, то придётся делать сохранение в файл вручную (т.е надо знать струтуру reg файла). Вот пример работы с этим классом:

uses Registry;
procedure TForm1.FormCreate(Sender: TObject);
var reg:TRegistry;
begin
reg:=TRegistry.Create;
reg.OpenKey('Software',true);
if reg.KeyExists('MyProg') then Application.Terminate else
reg.CreateKey('MyProg');
reg.Free;
end;

В Вашем случае необходимо проверять все ветки и сохранять названия ключей и их значение.

---------
Не всё то Windows, что висит!
Ответ отправил: Schmak (статус: Практикант)
Отправлен: 27.01.2006, 05:41

Отправить вопрос экспертам этой рассылки

Приложение (если необходимо):

* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!
Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.

© 2001-2006, Портал RusFAQ.ru, Россия, Москва.
Идея, дизайн, программирование: Калашников О.А.
Email: adm@rusfaq.ru, Тел.: +7 (926) 535-23-31
Авторские права | Реклама на портале 		Яндекс Rambler's Top100
Subscribe.Ru
Поддержка подписчиков
Другие рассылки этой тематики
Другие рассылки этого автора		 Подписан адрес:
Код этой рассылки: comp.soft.prog.delphiplus
Архив рассылки		 Отписаться Вебом Почтой
Вспомнить пароль
В избранное