CommaText Kommas in einem TEdit löschen

[rhodan]

Moin!

Ich stehe gerade auf dem Schlauch. Ich möchte eine art Scrabble-Löser programmieren...diesbezüglich gibt es auch eine menge source von dem man lernen kann bez. suchen in einem wörterbuch etc.

ich hab mir ein "spielfeld" mithilfe eines Stringgrids erstellt.

ich möchte nun das das alle spalten (die buchstaben die sich evtl. auf diesen feldern befinden) sowohl horizontal als auch vertical eingelesen werden.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  i : integer;
begin
   for i := 0 to 0 do
     edit1.text := playgrid.Rows[i].CommaText;
end;

Ich dachte mir ich lese die erste zeile auf diesem wege ein und vergleiche dann den inhalt des Edit1 mit dem Wörterbuch, danach die nächste zeile etc.

Das problem ist das ich durch den CommaText nach jedem buchstaben ein Komma im Editfeld habe...wie kann ich die buchstaben der felder in das Editfeld einlesen und (hinterher?) die Kommas löschen so das das wort nicht zerstückelt wird?

danke

[Puke]

Ehrlich gesagt hab ich keine Ahnung von StringGrids und erst recht nicht von CommaText.
Wenn du die Kommata (Rechtschreibnazi ), danach entfernen willst solltest du dir StringReplace anschauen.

Ich vermute mal dies könnte funktionieren:

Delphi-Quellcode:

var
  loc_s_word: string;
  i : integer;
begin
  for i := 0 to 0 do
     loc_s_word := playgrid.Rows[i].CommaText;

  edit1.text := StringReplace(loc_s_word, ',', '', [rfReplaceAll]);
end;

Hoffe ich konnte behilflich sein.
Puke

[rhodan]

danke für die schnelle antwort.
loc_s_word.text .text ist jedoch nicht zulässig/existiert nicht

[Puke]

Tja, bin ich wohl schon zu müde um Copy&Paste zu benutzen:
Das .text kannste weglassen. loc_s_word ist eine einfache lokale Stringvariable.

[rhodan]

-.-

ich danke dir!