$I und Strings

[Gargamel]

Hallo

Mit z.B. {$I Irgendwas.txt} kann man ja externe Dateien als Teil des Quellcodes einbinden (danke an "Die MuhKuh")

Nehmen wir mal an, in der irgendwas.txt steht das hier drin´:

Gargamel Wie kann ich jetzt den Compiler dazu bewegen, aus dieser Methode...

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var text:string;
begin
  //    
end;

... sowas zu generieren:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var text:string;
begin
  text:='Gargamel';    
end;

Solche Sachen wie

text:={$I Irgendwas.txt}

funktionieren ja leider nicht.
Auch das hier ist eher sinnfrei:

text:='{$I Irgendwas.txt}';

Eine Lösung wäre, die txt etwas zu verändern.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var text:string;
begin
  {$I Irgendwas.txt}
end;

Textdatei:

text:='Gargamel'; Besser würde mir allerdings gefallen, wenn ich die Textdatei überhaupt nicht ändern müßte.