Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Von Memo in String Grid kopieren (https://www.delphipraxis.net/146708-von-memo-string-grid-kopieren.html)

snears 25. Jan 2010 21:23


Von Memo in String Grid kopieren
 
Hey leute,
seit einem halben jahr habe ich nun delphi und das macht auch alles spaß, nur wollte ich nun ein programm machen und dazu brauch ich eure hilfe.
Und zwar möchte ich das Zahlen die in einem Memo stehen in ein String grid eingefügt werden.
Das sollte dann ungefähr so lauten:

Zähle wie oft 1 oder 2 oder 3 vorkommt und füge dann die Zahl in das Feld ein in das man klickt!

Hoffe ihr versteht was ich meine.

Oder geht das auch einfacher mit edit1.text, aber ich weiß halt nicht den begriff für zählen der zahlen und kopieren der Anzahl in ein Feld.

Hoffe das das thema nicht schon so häufig benutzt wurde, habe aber nichts gefunden.

Vielen Dank schon einmal im vorraus.


mfg snears

mkinzler 25. Jan 2010 21:31

Re: Von Memo in String Grid kopieren
 
Ziffern oder Zahlen?
Was für Trennzeichen?

snears 26. Jan 2010 16:06

Re: Von Memo in String Grid kopieren
 
also erstma sind das zahlen und das mit der frage der trennzeichen check ich net!^^

also ich habe pseudozufalszahlen und habe diese durch randomize halt erstellt und diese zahlen werden in einem memo erzeugt.

so und nun möchte ich, dass das programm einfach die zahlen zählt z.b. die ganzen 3 und das wenn ich auf ein edit feld klicke die anzahl kommt.

Also wenn z.b.

3 4 5 3 3 2 3 4 3

das dann wenn ich auf ein edit feld klicke das dann da steht 5x eine 3.

versteht ihr was ich nun meine!

MasterChief_88 26. Jan 2010 16:35

Re: Von Memo in String Grid kopieren
 
nich so ganz :roll:

p80286 26. Jan 2010 16:42

Re: Von Memo in String Grid kopieren
 
Hallo snears,

wenn ich Dich richtig verstanden habe, dann läßt Du Dein Programm eine ganze Menge "Zufallszahlen" produzieren. (in welchem Bereich? 0-10 0-100 ??)
Und in jeder Memozeile steht eine Zahl?

Und Du möchtest dieses Ergebnis in ein zweispaltiges Striggrid übertragen
Code:
  Zahl Anzahl
   1      6
   2      5
   3     22
....
  10      9
Richtig geraten?

Gruß
K-H

snears 26. Jan 2010 23:22

Re: Von Memo in String Grid kopieren
 
ja genau es.
es werden bei mir 20 zahlen erzeugt!
und nun wie du es auch schon geschrieben hast, soll das in ein string grid eingetragen wenn man ein feld anklickt!

Zahl Ergebnis

1 5
2 20
3 2
4 .
5 .
6 .
.
.
.
20 3

so und nun bräuchte ich dafür den code, also die anweisung !

daddy 27. Jan 2010 09:16

Re: Von Memo in String Grid kopieren
 
Du musst den Text Deines Memos "analysieren" und die darin enthaltenen Zahlen ermitteln. Zum Beispiel, indem Du mit
Delphi-Quellcode:
Pos(...)
die Position des nächsten Leerzeichens suchst und auf den davorstehenden Text
Delphi-Quellcode:
StrToInt(...)
anwendest, um zu ermitteln, um welche Zahl es sich handelt. Dann zählst Du die Werte z.B. in einer Array-Struktur
Delphi-Quellcode:
Array[1..20] of Integer
und schiebst die gezählten Werte am Schluss in Dein String-Grid. Näheres dazu wirst Du in der Delphi-Hilfe finden.

Gruß
Daddy

snears 27. Jan 2010 16:05

Re: Von Memo in String Grid kopieren
 
vielen dank, das werde ich dann ma ausprobieren,

aber wie ist der delhpi code für das einfügen des wertes mit einem mausklick in ein solches string grid?

snears 27. Jan 2010 22:00

Re: Von Memo in String Grid kopieren
 
ok ich vll zu dumm dafür, aber ich check das net wie ich das machen will!

Um genauer zu werden, das Programm soll Kniffel werden und ich habe auch schon fast alles erstellt.

Nur fehlen mir die letzten codes um es zu vollenden!

kann mir jemand nun helfen!?!?

hoika 28. Jan 2010 09:34

Re: Von Memo in String Grid kopieren
 
Hallo,

Zitat:

aber wie ist der delhpi code für das einfügen des wertes mit einem mausklick in ein solches string grid
Delphi-Quellcode:
procedure TForm1.StringGrid1_Click(); // oder wie immer das bei dir heisst)
begin
  StringGrid1.Cells[StringGrid1.Col,StringGrid1.Row]:= 'juhu';
end;
Das 'juhu' könnte man auch Ersetzen durch etwas Sinnvolles ;)


Heiko


Alle Zeitangaben in WEZ +1. Es ist jetzt 13:35 Uhr.
Seite 1 von 2  1 2      

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