The event will work right if you compare the correct result:
Delphi-Quellcode:
procedure TOSMap.FormActivate(Sender: TObject);
begin
if not( WebOSMaps1.Visible)then
if MessageBox(0,'Es ist etwas Falsch geschrieben. Bitte Prüfen Sie die Adresse Richtig über',
'AIDA', MB_OK or MB_ICONERROR)= MB_OK then begin
close;
end;
was meinst du mit(you compare the correct result)???
auch funktioniert es nicht