Ĺadny brzuch
Witam. Mam problem z funkcją Application.MessageBox w Lazarusie - OpenSource'owym klonie Delphi. Kod Delphi, który próbowałem zastosować:
var odp:LongInt; begin Odp:=Application.MessageBox('?','Pytanie',mb_YesNo); if odp=idYes then {jakies instrukcje} end;
zwraca mi 2 błędy (nie ma mb_YesNo oraz idYes). W takim razie jak ja do cholery mam to wykorzystać?!
a spróbuj użyć samego Messagebox
Niestety to nic nie da, bo i w MessageBox i w Application.MessageBox jest używana stała MB_YesNo, której Lazarus wydaje się pozbawiony.
musisz dodać do moduł: ' Windows ' do listy uses
Dziękuję, pomogło :clap:
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
var odp:LongInt; begin Odp:=Application.MessageBox('?','Pytanie',mb_YesNo); if odp=idYes then {jakies instrukcje} end;
zwraca mi 2 błędy (nie ma mb_YesNo oraz idYes). W takim razie jak ja do cholery mam to wykorzystać?!
a spróbuj użyć samego Messagebox
Niestety to nic nie da, bo i w MessageBox i w Application.MessageBox jest używana stała MB_YesNo, której Lazarus wydaje się pozbawiony.
musisz dodać do moduł: ' Windows ' do listy uses
Dziękuję, pomogło :clap: