AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

Cellen im Stringgrid zusammenrechnen

Ein Thema von SaFu · begonnen am 10. Jun 2008 · letzter Beitrag vom 11. Jun 2008
Antwort Antwort
Seite 2 von 5     12 34     Letzte » 
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.859 Beiträge
 
Delphi 11 Alexandria
 
#11

Re: Cellen im Stringgrid zusammenrechnen

  Alt 10. Jun 2008, 15:20
Aber warum dann 2 geschachtelte Schleifen mit den selben Grenzen?
Markus Kinzler
  Mit Zitat antworten Zitat
Benutzerbild von SaFu
SaFu

Registriert seit: 8. Nov 2006
1.360 Beiträge
 
Delphi 10.3 Rio
 
#12

Re: Cellen im Stringgrid zusammenrechnen

  Alt 10. Jun 2008, 15:22
Na ich glaube dann habe ich einen Denk fehler drin hab gedacht das der Rest die funktion übernimmt aber anscheinend nicht
"... Wie gesagt, die Nutzer von 10, 12, 14 Zoll Display's werden deine Seite nicht in voller Pracht sehen können, ...

Surft Ihr mit dem Taschenrechner?"
  Mit Zitat antworten Zitat
Benutzerbild von SaFu
SaFu

Registriert seit: 8. Nov 2006
1.360 Beiträge
 
Delphi 10.3 Rio
 
#13

Re: Cellen im Stringgrid zusammenrechnen

  Alt 10. Jun 2008, 15:42
OK

jetzt bekomme ich die nur die ergebnisse die in der zeile mit Out stehen in die StringList wie Rechne ich die jetzt zusammen jetzt brauch ich aber wirklich eure hilfe das weis ich nicht, hab ja gezeigt das ich will oder

Delphi-Quellcode:
procedure findStrings(sl:TStrings;s:TStrings);
var i :Integer;
    ergebnis :Tstrings;
begin
ergebnis:= TStringList.Create;
  try
   for i := 1 to Pred(sl.Count)-1 do
    if (sl[i]) = 'OUTthen
     begin
      ergebnis.Add(s[i]); //hier die änderung
     end;
    ergebnis.saveToFile('C:\test.txt');
   finally
  ergebnis.Free;
  end;
end;
"... Wie gesagt, die Nutzer von 10, 12, 14 Zoll Display's werden deine Seite nicht in voller Pracht sehen können, ...

Surft Ihr mit dem Taschenrechner?"
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.624 Beiträge
 
Delphi 12 Athens
 
#14

Re: Cellen im Stringgrid zusammenrechnen

  Alt 10. Jun 2008, 16:01
Delphi-Quellcode:
function findStrings(sl:TStrings;s:TStrings): double;
var i :Integer;
    ergebnis :Tstrings;
begin
  Result := 0;
  ergebnis:= TStringList.Create;
  try
   for i := 1 to Pred(sl.Count)-1 do
    if (sl[i]) = 'OUTthen
     begin
      ergebnis.Add(s[i]); //hier die änderung
      Result := Result + StrToFloatDef(s[i],0); //hier die Ergänzung
     end;
    ergebnis.saveToFile('C:\test.txt');
   finally
  ergebnis.Free;
  end;
end;
Allerdings ist Deine Vorgehensweise nicht ganz ungefährlich, da s mindestens so viele Einträge wie sl enthalten muss, sonst knallt es.
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
Benutzerbild von SaFu
SaFu

Registriert seit: 8. Nov 2006
1.360 Beiträge
 
Delphi 10.3 Rio
 
#15

Re: Cellen im Stringgrid zusammenrechnen

  Alt 10. Jun 2008, 16:04
Die zwei Spalten stehen in Beziehung zueinander ohne OUT gibts auch keine Switch
"... Wie gesagt, die Nutzer von 10, 12, 14 Zoll Display's werden deine Seite nicht in voller Pracht sehen können, ...

Surft Ihr mit dem Taschenrechner?"
  Mit Zitat antworten Zitat
Benutzerbild von SaFu
SaFu

Registriert seit: 8. Nov 2006
1.360 Beiträge
 
Delphi 10.3 Rio
 
#16

Re: Cellen im Stringgrid zusammenrechnen

  Alt 10. Jun 2008, 16:14
Wenn ich mir das ergebnis im Label anzeigen lasse ist es = 0??
"... Wie gesagt, die Nutzer von 10, 12, 14 Zoll Display's werden deine Seite nicht in voller Pracht sehen können, ...

Surft Ihr mit dem Taschenrechner?"
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.624 Beiträge
 
Delphi 12 Athens
 
#17

Re: Cellen im Stringgrid zusammenrechnen

  Alt 10. Jun 2008, 16:24
Dann klappt das Umwandeln in Float anscheinend nicht. Was steht denn drin?
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
Benutzerbild von SaFu
SaFu

Registriert seit: 8. Nov 2006
1.360 Beiträge
 
Delphi 10.3 Rio
 
#18

Re: Cellen im Stringgrid zusammenrechnen

  Alt 10. Jun 2008, 16:27
Einfach nur 0

oder mache ich es falsch

Label3.Caption FloatToStr(FindStrings(Stringgrid1................usw.
"... Wie gesagt, die Nutzer von 10, 12, 14 Zoll Display's werden deine Seite nicht in voller Pracht sehen können, ...

Surft Ihr mit dem Taschenrechner?"
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.624 Beiträge
 
Delphi 12 Athens
 
#19

Re: Cellen im Stringgrid zusammenrechnen

  Alt 10. Jun 2008, 16:35
Ich meinte, was steht in den Zellen, die Du addieren willst?
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
Benutzerbild von SaFu
SaFu

Registriert seit: 8. Nov 2006
1.360 Beiträge
 
Delphi 10.3 Rio
 
#20

Re: Cellen im Stringgrid zusammenrechnen

  Alt 10. Jun 2008, 16:38
Achso

Kommawerte siehe Anhang
Miniaturansicht angehängter Grafiken
werte_122.jpg  
"... Wie gesagt, die Nutzer von 10, 12, 14 Zoll Display's werden deine Seite nicht in voller Pracht sehen können, ...

Surft Ihr mit dem Taschenrechner?"
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 12:12 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