Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**bitsetter**

Und wenn das Programm beendet wird, sollte man den Speicher auch wieder frei geben:

Delphi-Quellcode:

			procedure TForm1.FormDestroy(Sender: TObject);

begin

 if DesktopDC > 0 then

   ReleaseDC(0, DesktopDC);

end;

bitsetter Registriert seit: 17. Jan 2007 1.169 Beiträge Turbo Delphi für Win32	#24 Re: Maus auf ein Ereignis reagieren lassen 15. Apr 2007, 16:57 Und wenn das Programm beendet wird, sollte man den Speicher auch wieder frei geben: markieren Delphi-Quellcode: procedure TForm1.FormDestroy(Sender: TObject); begin if DesktopDC > 0 then ReleaseDC(0, DesktopDC); end; Gruß bitsetter "Viele Wege führen nach Rom" Wolfgang Mocker (geb. 1954), dt. Satiriker und Aphoristiker
	Zitat