also erstmal war die Funktion im falschen Abschnitt. (dort oben sollten nur Funktionen hinn die von der
IDE automatisch erzeugt werden). Wozu du das Self als Parameter übergeben wolltest weißt du vermutlich selbst nicht. In deinem Fall kannst du es weg lassen. Und dann musst du im Implementationsteil noch den Klassennamen davor schreiben:
Delphi-Quellcode:
type
TForm2 = class(TForm)
//in diesem Abschnitt solltest du alles lassen wie es ist und nix hinzufügen
private
//hier kann deine Procedure rein
procedure Abfrage();
public
end;
[...]
implementation
//und hier musste unbedingt das "TForm2." davor damit klar ist zu welcher Klasse die Procedure gehört
procedure TForm2.Abfrage();
begin
end;
Benutze "Self" möglichst nie als Parameter da dies ein reservierter Variablenname für die Klasseninstanz ist.