Ok, ich hab mal hier schon was probiert. Damit bekomme ich die erste Zeile angezeigt. Wie kann ich diese und die folgenden 37 aber in ein Textfeld laden und diese verändern?
Mhm...
das hab ich bis jetzt mal hinbekommen:
Code:
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var sl: TStringList;
zeilennr: integer;
begin
sl:=TStringList.Create; //Objekt erzeugen
try
sl.LoadFromFile('c:\...\text.txt'); //Datei in Stringliste laden
ShowMessage(sl.Strings[21]); //Meldung ausgeben
finally
sl.free; //Objekt wieder freigeben
end;
end;
end.
Entschuldigt bitte, wenn ich zu ungeduldig bin, aber mich hat's gepackt
Liebe Grüße
Steffi