Datei suchen u. Path dann in die Registry schreiben

[m-werk]

Hi, vielen Dank für deine bemühungen.

Code:

procedure TForm1.SuchenClick(Sender: TObject);
begin
  Suchen('Kundendaten.mdb');
end;

Bei diesem Code kommen folgende Fehlermeldungen:
Bei 'Suchen(' steht der Cursor nach der Klammer und die fehlermeldung lautet:
Operator oder Semikolon fehlt

Und zum Schluss dieser Zeile 'Anweisung erforderlich, aber Ausdruck vom Typ 'TButton' gefunden'

Ich habe dann bei 'Suchen:=('Kundendaten.....' eingegeben

Nun kommt nur mehr eine Meldung:
[Fehler] DBsuche.pas(171): Inkompatible Typen: 'TButton' und 'String'

Mit dieser kann ich leider nichts anfangen