ini-files

[the_seed]

mmhh finde nix...:?
egal
also ich habe ne ini:

hallo
wie gehts...
usw.

wie kann ich die bis zu einem bestimmten punkt in mein memo laden?
dass ich zb. bei btn1.click in meinem memo 'hallo' und bei btn2.click 'wie gehts...' drin stehn hab.

[glkgereon]

ich würde erst in ne Tstrings laden, und dann deinen teil in die memo übertragen...

[phXql]

Delphi-Quellcode:

var t_str : TStringList;
begin
  t_str := TStringList.Create;
  t_str.LoadFromFile('[dateiname.suffix]');
end;

soweit zum einlesen in die stringlist. der rest is auch ziemlich leicht (wenn man die richtige idee hat) :)

[the_seed]

Zitat:

Zitat von glkbkk

ich würde erst in ne Tstrings laden, und dann deinen teil in die memo übertragen...

wie mach ich das? habe noch nie mit ini-files gearbeitet :)

[Luckie]

Das ist keine Ini-Datei. Das íst schlicht und ergreifend eine Textdatei.

[the_seed]

hmmm k,
ich blick da grad nimmer durch, angenommen ich dann ne txt-file in der zb. 50 namen stehen wir muss ich die dann eintragen bzw. wie kann ich die jeweiligen namen in ein memo laden ???????????????

[Luckie]

Delphi-Quellcode:

Memo1.Lines.LoadFromFile('...');

Die Eigenschaft Lines ist vom Typ TStrings, welche die Methode LoadFromFile kennt.

[the_seed]

ja, ich will aber net die komplette txt-laden nur einen teil :)

[Luckie]

Ja dann lad die Datei zu erst in eine Stringlist und dann pickst du dir die Einträge raus, die du brauchst und zeigst sie im Memo an.

[the_seed]

Zitat:

Zitat von Luckie

Ja dann lad die Datei zu erst in eine Stringlist und dann pickst du dir die Einträge raus, die du brauchst und zeigst sie im Memo an.

das müsste doch dann so heissen?

Code:

var namen: tstringlist;
begin
namen.loadfromfile('lol.txt');
memo1.lines.add(namen[1]);

kommt ber ne fehlermdelung -> zugriffsverletzung...


[edit] :wall: :wall:
namen = tstringlist.create;
[/edit]

danke für eure hilfe!!!

[phXql]

du musst auch erst eine instanz von TStringList erzeugen...

namen := TStringList.Create();

[Luckie]

Delphi-Quellcode:

var
  sl: TstringList;
begin
  sl := TStringList.Create;
  try
    sl.LoadFromFile('...');
    Memo1.Lines.Add(sl.Strings[1]);
  finally
    FreeAndNil(sl);
  end;

[the_seed]

boah ich werd moch beklopt ...:gruebel:
jetzt hab ich die die strings erfolgreich in ein memo geladen nur -
kann ich da keine leerzeilen verwenden?
wenn in dem txt-file
[1]
hallo
wie gehts dir
[2]
...
steht wird nur das hallo übernommen???

[MrKnogge]

Weil du ja auch nur die zweite Zeile hinzufügst:

Delphi-Quellcode:

Memo1.Lines.Add(sl.Strings[1]);  // 0 ist die erste Zeile, 1 die zweite,...

Dies ist also der Code für deinen ersten Button, der Code für den zweiten wäre dann:

Delphi-Quellcode:

Memo1.Lines.Add(sl.Strings[2]);