Einzelnen Beitrag anzeigen

Klaus01

Registriert seit: 30. Nov 2005
Ort: München
5.755 Beiträge
 
Delphi 10.4 Sydney
 
#13

Re: Doppelten String nicht übergeben

  Alt 11. Jun 2007, 17:59
Hallo Sascha,

das sollte in etwas so gehen:

Delphi-Quellcode:
var
  sl: TStringList;

begin
  sl := TStringList.create;
  sl.sorted := true; // Liste sortieren Modus
  sl.duplicated := dupIgnore; // keine doppelten Einträge
  sl.assign(StringGrid1.cols[11]); // zuweisen der Spalte 11 in die StringListe
  sl.add(edit1.text); // hinzufügen des neuen Textes, wenn doppelt wird er nicht hinzugefügt
  StringGrid1.cols[11].assign(sl); // zuweisen der StringListe in die Spalte 11
  sl.free; // freigeben der StringListe
end;
Habe es nicht getestet.
Grüße
Klaus
Klaus
  Mit Zitat antworten Zitat