Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi CommaText Kommas in einem TEdit löschen (https://www.delphipraxis.net/186344-commatext-kommas-einem-tedit-loeschen.html)

rhodan 25. Aug 2015 18:34

Delphi-Version: XE7

CommaText Kommas in einem TEdit löschen
 
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 25. Aug 2015 18:43

AW: CommaText Kommas in einem TEdit löschen
 
Ehrlich gesagt hab ich keine Ahnung von StringGrids und erst recht nicht von CommaText.
Wenn du die Kommata (Rechtschreibnazi :stupid:), danach entfernen willst solltest du dir Delphi-Referenz durchsuchenStringReplace 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 25. Aug 2015 18:52

AW: CommaText Kommas in einem TEdit löschen
 
danke für die schnelle antwort.
Delphi-Quellcode:
loc_s_word.text
.text ist jedoch nicht zulässig/existiert nicht :|

Puke 25. Aug 2015 19:01

AW: CommaText Kommas in einem TEdit löschen
 
Tja, bin ich wohl schon zu müde um Copy&Paste zu benutzen:
Das
Delphi-Quellcode:
.text
kannste weglassen.
Delphi-Quellcode:
loc_s_word
ist eine einfache lokale Stringvariable.

rhodan 25. Aug 2015 19:07

AW: CommaText Kommas in einem TEdit löschen
 
-.-

ich danke dir!


Alle Zeitangaben in WEZ +1. Es ist jetzt 16:55 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz