Einzelnen Beitrag anzeigen

Benutzerbild von SaFu
SaFu

Registriert seit: 8. Nov 2006
1.360 Beiträge
 
Delphi 10.3 Rio
 
#12

Re: StringGrid spalte in .txt

  Alt 7. Apr 2008, 21:04
Also entweder stehe ich auf dem schlauch oder ich raffe es echt net

Wie soll ich die Zweite liste anhängen

Delphi-Quellcode:
procedure TForm7.Button1Click(Sender: TObject);
Var sGridL,sGridLTemp :TStringList;
begin
  try
   sGridL:= TStringList.Create;
   sGridL.Sorted:= true;
   sGridL.Duplicates:= dupIgnore;
   sGridL.AddStrings(StringGrid1.Cols[2]);

   sGridLTemp:= TStringList.Create;
   sGridLTemp.Sorted:= true;
   sGridLTemp.Duplicates:= dupIgnore;
   sGridLTemp.LoadFromFile('c:\Test.txt');
   StringGrid1.Cols[2]:= sGridL;

   sGridL.SaveToFile('c:\Test.txt');
   sGridL.Free;
  except;
    MessageDlgPos7('Fehler beim speichern',mtInformation,[mbOk],self);
  end;
end;
"... Wie gesagt, die Nutzer von 10, 12, 14 Zoll Display's werden deine Seite nicht in voller Pracht sehen können, ...

Surft Ihr mit dem Taschenrechner?"
  Mit Zitat antworten Zitat