Zitat von
romber:
Und wo kommen FEditHandle und FExplorerHandle bitte her??? Muss ich in Uses-Teil was hinzufügen?
Nein, diese beiden Größen waren/sind bloß ganz normale (Feld-) Variable von Form1, ...welche quasi nur jeweils das
Handle des Explorers bzw. das des fraglichen Edit-Controls darauf zwischenzuspeichern hatten:
Delphi-Quellcode:
type
TForm1 = class(TForm)
Label1: TLabel;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
FEditHandle : hWnd;
FExplorerHandle : hWnd;
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;