Forum: Object-Pascal / Delphi-Language
Delphi
by Sir Rufo,
8. Nov 2009
Die Frage ist zu allgemein gestellt.
Genau wie: "Ist es sehr schwer Menschen dazu zu bewegen zu mir nach Hause zu kommen?"
Kann man eigentlich nur mit "Was weiß ich, eigentlich ja nicht, aber ... ich kenne die Menschen und Dein Zuhause nicht!" :mrgreen:
Forum: Object-Pascal / Delphi-Language
Delphi
by Sir Rufo,
8. Nov 2009
Das Gleiche was auch Text bedeutet, nur das bei immer nur der 1. Buchstabe genommen wird.
Damit stellen wir sicher, dass Text auch genau nur einen Buchstaben (also ein Char-Wert) zugewiesen wird.
btw. du durchläufst nicht die Spalten sondern die Zeilen ;)
Forum: Object-Pascal / Delphi-Language
Delphi
by Sir Rufo,
8. Nov 2009
ok, dann machen wir das ganze nochmal etwas dynamischer :mrgreen:
try this:
Text2 := mOriginal.Text;
for i := 1 to Length( Text2 ) do // alle Positionen des Textes durchlaufen
for r := 0 to StringGrid1.RowCount - 1 do // mit allen Zeilen des StringGrids vergleichen
if mOriginal.Text = StringGrid1.Cells then
Text2 := StringGrid1.Cells;
mOriginal.text := Text2;
Forum: Object-Pascal / Delphi-Language
Delphi
by Sir Rufo,
8. Nov 2009
Nein, da ist noch ein sehr gravierender Fehler drin.
Du prüfst L-mal nach, ob der L-te Buchstabe des Textes einen Wert hat.
Das scheint mir nicht sehr sinnvoll ;)
Forum: Object-Pascal / Delphi-Language
Delphi
by Sir Rufo,
8. Nov 2009
for i := 1 to L do // 1 bis Länge des Textes
begin
if mOriginal.text = stringgrid1.Cells then Text2 := stringgrid1.Cells;
end;
// Das Ergebnis, steht jetzt in Text2 und soll wieder zurück in das Memofeld
mOriginal.text := Text2;
Ein Computer macht das, was man ihm sagt, unter keinen Umständen etwas anderes. :mrgreen:
axo, da du ja vielleicht mehr als nur den Wert aus der...