Delphi-PRAXiS :: Das Forum für Fragen zu Delphi
Das Experten Forum für Delphi Programmierer
Hilfe für CodeGear Delphi gibts es hier im Forum
Delphi Quelltexte und Source Codes
  
Delphi-PRAXiS :: Foren-ÜbersichtForen-Übersicht Delphi-PRAXiS Modul-ÜbersichtSite-Map Delphi-PRAXiS durchsuchenSuchen Delphi-PRAXiS Code-LibraryCode-Library Jetzt registrieren!Registrieren Login  
   
 
0
 
Delphi für Win32
zahlen in zwei stringgids vergleichen (lotto)
Ein Delphi (Win32)-Thema von Molzer.
Vorheriges Thema anzeigen  |  Nächstes Thema anzeigen 		Neuen Beitrag schreiben Auf Beitrag antworten
als PDF-Datei herunterladenThema ausdrucken
 
Delphi-PRAXiS Forum - Übersicht -> VCL / WinForms / Controls
Seite 1 von 1   [ 5 Beiträge ]  
 
 Autor 
  Nachricht 
 
Molzer #1|Beitrag #984442Verfasst am: 06.01.2009, 16:48      Titel: zahlen in zwei stringgids vergleichen (lotto) Antworten mit Zitat
Mitglied
Status: offline
Beiträge: 70
angemeldet: 07.12.2008
Sprache: Delphi (Win32)

Hallo!

habe zwei stringgrids wo je 6 zahlen(eingetippt und zufall) stehen, diese würde ich jetzt gerne vergleichen.
dazu habe ich mir überlegt ich suche von den getippten in den zufalls zahlen,und gebe sie im einem tedit aus.

bin gerade beim suchen lernen und tue mir schwer..

Delphi-Quellcode: markieren
begin
    x:=0;
    for i := 1 to 6 do
      begin if StringGrid1.Cells[1,0]=StringGrid2.Cells[i,0] then
      x:=x+1
      end;
      begin if StringGrid1.Cells[2,0]=StringGrid2.Cells[i,0] then
      x:=x+1


für die erste zelle würde das ja gehen aber bei der zweiten steh ich schon an..
wird sicher noch etwas einfacheres geben..

vielleicht kann mir jemand einen ansatz geben...

fg

Meine Version:
Borland® Delphi® für Microsoft® Windows™ Version 10.0.2288.42451 Update 2 Copyright © 2005 Borland® Software Corporation.
nach oben nach unten
Benutzer-Profile anzeigen Private Nachricht senden
Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen im Forum zu suchen. Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen bei Google zu suchen. Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen bei Wikipedia zu suchen.
 
 
Molzer #2|Beitrag #984443Verfasst am: 06.01.2009, 16:49      Titel: Re: zahlen in zwei stringgids vergleichen (lotto) Antworten mit Zitat
Mitglied
Status: offline
Beiträge: 70
angemeldet: 07.12.2008


 so siehts aus

[ An diesen Beitrag wurden eine oder mehrere Dateien angehängt. Zum Herunterladen bitte anmelden. ]

Meine Version:
Borland® Delphi® für Microsoft® Windows™ Version 10.0.2288.42451 Update 2 Copyright © 2005 Borland® Software Corporation.
nach oben nach unten
Benutzer-Profile anzeigen Private Nachricht senden
Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen im Forum zu suchen. Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen bei Google zu suchen. Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen bei Wikipedia zu suchen.
 
 
DeddyH #3|Beitrag #984450Verfasst am: 06.01.2009, 16:54      Titel: Re: zahlen in zwei stringgids vergleichen (lotto) Antworten mit Zitat
"Rüsselmops" ;-)
Alter: 43
Status: offline
Beiträge: 11.362
angemeldet: 17.09.2006
Wohnort: Schweina/Thüringen
Delphi 2007 Professional

 Du willst ermitteln, wieviele Richtige das sind? Müsste so funktionieren (aus dem Kopf getippt):
Delphi-Quellcode: markieren
x := 0;
for i := StringGrid1.FixedCols to Pred(StringGrid1.ColCount) do
  if StringGrid2.Rows[0].IndexOf(StringGrid1.Cells[i,0]) > 0 then
    inc(x);

10 Minuten Nachdenken ersparen oftmals 10 Stunden Fehlersuche.

If a train station is where the train stops, what the hell is a workstation? Grübelnd...
nach oben nach unten
Benutzer-Profile anzeigen Private Nachricht senden
Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen im Forum zu suchen. Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen bei Google zu suchen. Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen bei Wikipedia zu suchen.
 
 
Molzer #4|Beitrag #984461Verfasst am: 06.01.2009, 17:02      Titel: Re: zahlen in zwei stringgids vergleichen (lotto) Antworten mit Zitat
Mitglied
Status: offline
Beiträge: 70
angemeldet: 07.12.2008


 das ist für mich als anfänger noch etwas zu hoch.. leider..
bin gerade etwas mit true and false zu konstruieren Laughing
fg

Meine Version:
Borland® Delphi® für Microsoft® Windows™ Version 10.0.2288.42451 Update 2 Copyright © 2005 Borland® Software Corporation.
nach oben nach unten
Benutzer-Profile anzeigen Private Nachricht senden
Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen im Forum zu suchen. Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen bei Google zu suchen. Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen bei Wikipedia zu suchen.
 
 
DeddyH #5|Beitrag #984489Verfasst am: 06.01.2009, 17:38      Titel: Re: zahlen in zwei stringgids vergleichen (lotto) Antworten mit Zitat
"Rüsselmops" ;-)
Alter: 43
Status: offline
Beiträge: 11.362
angemeldet: 17.09.2006
Wohnort: Schweina/Thüringen
Delphi 2007 Professional

 Das war sowieso nicht ganz richtig, müsste wohl eher so heißen:
Delphi-Quellcode: markieren
x := 0;
for i := StringGrid1.FixedCols to Pred(StringGrid1.ColCount) do
  if StringGrid2.Rows[0].IndexOf(StringGrid1.Cells[i,0]) > Pred(StringGrid2.FixedCols) then
    inc(x);

10 Minuten Nachdenken ersparen oftmals 10 Stunden Fehlersuche.

If a train station is where the train stops, what the hell is a workstation? Grübelnd...
nach oben nach unten
Benutzer-Profile anzeigen Private Nachricht senden
Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen im Forum zu suchen. Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen bei Google zu suchen. Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen bei Wikipedia zu suchen.
 
Anzeige-Optionen:    
 
Delphi-PRAXiS Forum - Übersicht -> VCL / WinForms / Controls Alle Zeiten sind GMT + 1 Stunde
Seite 1 von 1   [ 5 Beiträge ]  
 
  Neuen Beitrag schreiben Auf Beitrag antworten
als PDF-Datei herunterladenThema ausdrucken 		 
   
Gehe zu:  
Du darfst keine Beiträge in dieses Forum schreiben.
Du darfst auf Beiträge in diesem Forum nicht antworten.
Du darfst Deine Beiträge in diesem Forum nicht bearbeiten.
Du darfst Deine Beiträge in diesem Forum nicht löschen.
Du darfst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten.
Du kannst Dateien in diesem Forum nicht herunterladen.


Impressum / Kontakt
Allgemeine Geschäftsbedingungen
Verhaltenskodex & FAQ

 Delphi-PRAXiS :: Das Forum für Delphi-Programmierer
Das Experten Forum für Delphi ProgrammiererHilfe für Borland Delphi gibts es hier im ForumDelphi Quelltexte und Source CodesDelphi-PRAXiS :: Das Forum für DelphiWindows APIInternet und NetzwerkeVCL und Datenbanken
 
Delphi-PRAXiS V.2005 III
© 2002-2009 by Daniel R. Wolf
powered by phpBB © phpBB Group
Impressum / Kontakt Allgemeine Geschäftsbedingungen