[delphi] getforegroundwindow probleem

[Mr.Nobody]

ik wil de tekst uit de titlebar halen met deze code:

code:

procedure xxxxx

var
  Wnd: HWND;
  windownaam:pchar;
  applicatie:string;
  lengte:integer;
begin
  wnd := GetForegroundWindow;

  lengte := getwindowtextlength(wnd)+1;

  getwindowtext(wnd,windownaam,lengte);

  applicatie := strpas(windownaam);
 
  label1.Caption :=  applicatie;
end;

werkt perfect alleen bij bv de internet explorer krijg ik een access violation. bij de meeste gaat het goed.
wat gaat er mis? ik denk zelf iets met de lengte ofzo.

gebruikte urls:
getwindowtextlength

getforegroundwindow

van deze pagina:
windowsuserinterface

edit: vooruit toch maar codetag gebruiken dan.

[whoami]

Ik zou het niet weten. Debug even zou ik zeggen.

Tip: gebruik in de toekomst code-tags.

[Mr.Nobody]

Op maandag 08 juli 2002 16:50 schreef whoami het volgende:
Ik zou het niet weten. Debug even zou ik zeggen.

Tip: gebruik in de toekomst code-tags.

ik wilde code gebruiken, maar dan komt vette tekst er niet uit

[whoami]

Op maandag 08 juli 2002 16:52 schreef Mr.Nobody het volgende:

[..]

ik wilde code gebruiken, maar dan komt vette tekst er niet uit

<off-topic>
Waarom wil jij er vette tekst in? Voegt niets toe imo en code-tags zijn duidelijker.
</off-topic>

Maar goed, even de debugger aanzwieren dus.

[Mr.Nobody]

toch ff melden:

probleem was een bug in delphi zelf, opgelost door SP2

[schaam]
was niet geinstalleerd
[/schaam]