Вниз
Скачать: CL | DM;

как создать окно сообщения , чтоб был флажок   Найти похожие ветки 

 
Tahion ©   (2002-08-17 09:55) [0]

как создать окно сообщения (а лучше посоветуйте компонент), чтоб в нем был флажок "больше не показывать это"? И чтоб нанные автоматом записывались в реестр или илни файл по моему желанию.

А еще нужен компонент сообщения об ошибке, чтоб была кнопочна "Подробности"


 
Александр ©   (2002-08-17 11:20) [1]

Зачем компаненты? Создайте две новых формы, добавьте на них чекбоксы и все что нужно. А потом, чтобы заполнить эти чекбоксы и т.д. просто на главной форме сделайте на событие кнопки ли где у вас команда открытия формы if From1.c:=tip then Form2.CheckBox1.Cahked:=true; Вот и все.


 
VAleksey ©   (2002-08-17 11:23) [2]

Да ... а еще дайте мне программу которая умеет делать все, что мне нужно, и бесплатно, и чтоб не глючила, и чтобы мне деньги за нее заплатили, и чтобы самому ничего не делать, ни о чем не думать и ни о чем не знать.


 
BAHO ©   (2002-08-17 23:09) [3]


Var
AMsgDialog:TForm;
ACheckBox:TCheckBox;
begin
AMsgDialog:=CreateMessageDialog("This is a test message.", mtWarning, [mbYes, mbNo]);
ACheckBox:=TCheckBox.Create(AMsgDialog);
with AMsgDialog
do try
Caption:="Dialog Title" ;
Height:=169;
With ACheckBox
do
begin
Parent:=AMsgDialog;
Caption:="больше не показывать это";
top:=121;
Left:=8;
end;
Case ShowModal
of
ID_YES: ;//...
ID_NO: ;//...
end;
If ACheckBox.Checked
then
begin
//...
end;
finally
ACheckBox.Free;
Free;
end;end;


 
Tahion ©   (2002-08-18 09:42) [4]

Спасибо!!!



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.01 c
1-95898
Punk4
2002-08-11 20:48
2002.08.29
try... finally в Delphi 5


3-95721
SZap
2002-08-08 13:34
2002.08.29
Как сформировать запрос в TQuery


1-95802
Анатолий
2002-08-20 06:56
2002.08.29
Работа с QuickReport в


1-95819
ivanVV
2002-08-16 22:13
2002.08.29
Работа с ini файлом


1-95783
Nazareth
2002-08-19 12:30
2002.08.29
Оператор is




   Наверх