AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Delphi-PRAXiS - Lounge Klatsch und Tratsch wer kann helfen und ist aus Hamburg?

wer kann helfen und ist aus Hamburg?

Ein Thema von Gilmohr · begonnen am 3. Mär 2011 · letzter Beitrag vom 27. Mär 2011
Antwort Antwort
Seite 4 von 4   « Erste     234
Benutzerbild von Sir Rufo
Sir Rufo

Registriert seit: 5. Jan 2005
Ort: Stadthagen
9.454 Beiträge
 
Delphi 10 Seattle Enterprise
 
#31

AW: wer kann helfen und ist aus Hamburg?

  Alt 27. Mär 2011, 07:09
Moin,

Nutze doch bitte für Delphi-Code die Delphi-Tags, dann kann man es besser lesen.

Was ist denn jetzt die Frage?
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ‎ea 0a 4c 14 0d b6 3a a4 c1 c5 b9 dc 90 9d f0 e9 de 13 da 60)
  Mit Zitat antworten Zitat
Gilmohr

Registriert seit: 3. Mär 2011
15 Beiträge
 
#32

AW: wer kann helfen und ist aus Hamburg?

  Alt 27. Mär 2011, 14:23
hi, ok werd ich in zukunft machen

die frage dazu: woran liegt es dass wenn radioButton1 aktiv ist die felhlermeldung ""kein gültiger gleitkommawert kommt?

hab doch den array V2[a] wieder mit strToFloat als dezimalzahl umgewandelt....

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);

const
  K = 1273.239545; // ~= 4 *1000/ PI

begin

  a := 0 ;
    repeat

    StringGrid2.RowCount := a+1;
    if RadioButton2.Checked then begin //wenn Strömungsgeschw gewählt berechne mit Formel Strömungsgeschw
    v2[a] := FloatToStr((Volumenstrom * K) / ( StrToInt(d[a])*StrToInt(d[a])));
    StringGrid2.Cells[0,a] := v2[a] ;
    end;

    if RadioButton1.Checked then begin //wenn Druckverlust gewählt berechne mit Formel Druckverlust
    v2[a] := FloatToStr((Volumenstrom * K) / ( StrToInt(d[a])*StrToInt(d[a])));
    p2[a] := FloatToStr((StrToInt(p1[a])) * StrToFloat(v2[a]) * StrToFloat(v2[a]) / ( StrToFloat(v1[a])/100 * StrToFloat(v1[a])/100 ));
    StringGrid2.Cells[1,a] := p2[a] ;
    end;

    memo1.Lines.add(' - j= ' +intToStr(j)+' - a= '+intToStr(a));
    inc (a);
    until
    a = j

end;
was hab ich da übersehen bzw. falsch gemacht?
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.202 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#33

AW: wer kann helfen und ist aus Hamburg?

  Alt 27. Mär 2011, 14:26
Warum speicherst du die Werte nicht als Floats sondern als Strings ab?
Markus Kinzler
  Mit Zitat antworten Zitat
Gilmohr

Registriert seit: 3. Mär 2011
15 Beiträge
 
#34

AW: wer kann helfen und ist aus Hamburg?

  Alt 27. Mär 2011, 14:37
wenn ich die im StrinGrid ausgeben will brauch ich die doch als String, oder lieg ich da falsch?
sorry bin Delphi anfänger. wie würde das denn aussehen?
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.202 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#35

AW: wer kann helfen und ist aus Hamburg?

  Alt 27. Mär 2011, 14:43
Dann wandele es vor der Anzeige um, bzw. Fomatiere die Werte. Da du aber mit den Werten rechnest würde ich diese auch als als Fliesskommazahlen speichern.
 m, dp, v, d: Array[0..10] of Extended; StringGrid2.Cells[1,a] := FloatToStr(p2[a]) ;
Markus Kinzler
  Mit Zitat antworten Zitat
Gilmohr

Registriert seit: 3. Mär 2011
15 Beiträge
 
#36

AW: wer kann helfen und ist aus Hamburg?

  Alt 27. Mär 2011, 15:08
Versteh ich irgendwie nicht... mein Array ist doch ein String...wüsste jetzt nicht wie ich das wenn ich den als extended angebe den rest umbaue damit das funktioniert ??
Delphi-Quellcode:


[...]
  m, p1, p2, v1,v2, d: Array[0..10] of Extended;
[...]

  m[j] := Werte[j].Strings[0];
  p1[j] := Werte[j].Strings[1];
  v2[j] := Werte[j].Strings[2];
  d[j] := IntToStr(Durchmesser);

[...]
  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 00:09 Uhr.
Powered by vBulletin® Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2019 by Daniel R. Wolf