Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.02.04;
Скачать: CL | DM;

Вниз

Resurs   Найти похожие ветки 

 
YUS   (2001-12-09 17:58) [0]

Почему не создается окно, выдает ошибку?
Я уже задавал вопрос, ресурс подсоединил, но ошибка при создании окна осталась.

implementation

{$R *.DFM}
{$R Dialog.RES}
function Disp:boolean;
begin
result:=false;
end;
procedure TForm1.Button3Click(Sender: TObject);
begin
CreateDialog(hInstance,MAKEINTRESOURCE(10), null,@Disp);
end;

Файл ресурсов создан редактором ресурсов и наз-ся Dialog.res

10 DIALOG 127, 64, 228, 138
STYLE WS_VISIBLE | WS_SYSMENU | WS_THICKFRAME | WS_MAXIMIZEBOX | WS_MINIMIZEBOX | WS_POPUP |WS_CAPTION |WS_BORDER |WS_DLGFRAME
FONT 8, "MS Sans Serif"
LANGUAGE LANG_NEUTRAL, 0
BEGIN
END


 
Suntechnic ©   (2001-12-09 18:03) [1]

Что за ошибка? И с чего ты взял, что она вообще есть эта ошибка...


 
YUS   (2001-12-09 18:55) [2]

Смешной вопрос. Если бы ее не было я бы не спрашивал.Не знаю в чем ошибка, но при нажатии на button3 выдает " Progect Progect1.exe raised exception class EVariantError with message Invalid variant type conversion. "


 
absent   (2001-12-09 19:18) [3]

Родительское окно имеет Handle равным null ??


 
YUS   (2001-12-09 21:58) [4]

Вместо null поставил 0 - работает !! Большое спасибо.



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

Текущий архив: 2002.02.04;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.006 c
1-8928
SergN
2002-01-17 16:34
2002.02.04
Как в Memo записать текстовый DOS файл?


3-8798
Antoniz
2002-01-08 14:27
2002.02.04
Как программно создать БД Interbase


6-8970
Oplg
2001-11-12 18:57
2002.02.04
Вопрос


1-8923
Valdemar
2002-01-16 12:36
2002.02.04
Как оставить приложение без окна выполнятся до окончания работы Windows?


3-8748
TAIS
2002-01-02 09:47
2002.02.04
триггер