Форум: "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.72 MB
Время: 0.021 c
1-8907            petyun                2002-01-17 10:04  2002.02.04  
строка в ListBox как в плей-листе WinAmp


1-8925            Dmitriy_R             2002-01-15 10:49  2002.02.04  
Создание файла?


6-8960            SemFLY                2001-11-11 18:56  2002.02.04  
Почему никак не разберусь ! :-(


7-9015            fsp                   2001-10-24 19:30  2002.02.04  
Зацепить обьект из другого приложения


1-8827            SelfDestructor        2002-01-18 19:53  2002.02.04  
Как сделать страницу в PageControl невидимой