Главная страница
    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.45 MB
Время: 0.006 c
1-95429
snoup
2002-07-16 16:15
2002.07.29
Привет! Как программно послать SMS на какую-нить мобилу!!!


1-95414
kserg@ukr.net
2002-07-16 13:13
2002.07.29
REPORT - что за ошибка такая?


3-95179
Oleon
2002-07-05 13:13
2002.07.29
Переход с Local InterBase на InterBase Server


3-95234
Akhmadey
2002-07-08 21:04
2002.07.29
EhLib


14-95554
MetalFan
2002-07-03 12:08
2002.07.29
Что за файл?





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский