Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.04;
Скачать: [xml.tar.bz2];
Вниз
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 - работает !! Большое спасибо.
Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.04;
Скачать: [xml.tar.bz2];
Память: 0.74 MB
Время: 0.014 c