procedure mit variabler komponente

[Noobix93]

Hallo, ja mein erster Post hehe
Ja, der grund warum ich mich registriert habe ist ich komm nicht weiter.

Ich möchte eine Procedur schreiben die folgendermassen aussieht:

procedure addsql(const Name:String) Name soll dabei eine komponente auf form1 sein.

z.b
addsql(memo1); So das ich den die komponente frei festlegen kan womit er deise Procedur ausführt.
Es kan sein das ich komplett falsch liege, noch habe ich nicht viel mit Delphi gemacht doch dies bringt mich wirklich zum verzweifeln


in der Procedur soll dan z.b sowas stehen:

Delphi-Quellcode:

procedure addsql(const Name:String);
var q: string;
    ex: boolean;
    insert:string;
  begin
      if assigned(form1.FResult) then begin
    if form1.FMysql.Status<>MYSQL_STATUS_READY then
      ShowMessage('Ein Ergebnis wurde unvollständig gelesen!');
      FreeAndNil(form1.FResult);
  end;
  insert:=name.lines[name.lines.count] // Name funktioniert natürlich nicht es soll zeigen das ich die eigenschaft von name verwenden will, Name ist auf der Form z.b Memo1
  form1.FResult := form1.FMysql.query(insert, true, ex);
  if assigned(form1.FResult) then
    ShowMessage('Query: OK - Ergebnis gespeichert')
  else
    if ex then
      ShowMessage('Query: OK - ausgeführt')
    else
      ShowMessage('Query fehlgeschlagen: '+form1.FMysql.LastError);
  end;

Er sagt mir natürlich das variablen keine Eigenschaften haben.