Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "WinAPI";
Текущий архив: 2002.07.29;
Скачать: [xml.tar.bz2];

Вниз

А можно ли разместить кампонент в диалоге?   Найти похожие ветки 

 
Alexfdfdfd   (2002-05-22 02:33) [0]

Интересно вот когда появляется диалог, допустим вызаваемый
ShowMessage(); , то чем это не окно. Так идея заключаеться в том можно получить хендел на канву, или разместить там какой -нибудь компонент. Или даже унаследовать этот диалог, и написать свой на основе этого(хотя здесь может проще зделать форму).
Если это возможно, то прошу побольше коментариев, и кода.


 
Serhy   (2002-05-22 02:53) [1]

Максимум из возможного - "РАЗРЕШЕНО ВСЕ, ЧТО НЕ ЗАПРЕЩЕНО"!
Остальное требует пояснений, а то в вопросе слишком многое непонятно.


 
Сатир   (2002-05-22 14:03) [2]

2Alexfdfdfd
посмотри исходники реализации этого класса, ну и если тебе чего-то хочется добавить, породи от него своего потомка и лепи из него, чё пожелаешь.
Удачи.


 
easy   (2002-05-23 14:32) [3]

procedure TForm1.Button1Click(Sender: TObject);
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 := "Dont show me again.";
Top := 121;
Left := 8;
end;
if (ShowModal = ID_YES) then
begin
if ACheckBox.Checked then
begin //... do if checked
end; //... do if NOT checked
end;
finally ACheckBox.Free;
Free;
end;
end;




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

Форум: "WinAPI";
Текущий архив: 2002.07.29;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.006 c
3-95196
Nebula
2002-07-05 14:51
2002.07.29
IB SQL UDF


14-95508
Merlin
2002-07-01 17:07
2002.07.29
Тест на сообразительность


6-95482
uncle_m16
2002-05-18 12:53
2002.07.29
подскажите пожалуста !!


1-95385
hooch
2002-07-16 08:03
2002.07.29
Фреймы в dll (D6, WinXP)


3-95192
Анонимщик
2002-07-02 21:14
2002.07.29
Interbase, ISC4.gdb





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский