AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Boolean fehler

Ein Thema von Gilmohr · begonnen am 27. Mär 2011 · letzter Beitrag vom 27. Mär 2011
Antwort Antwort
Seite 1 von 2  1 2      
Gilmohr

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

AW: Boolean fehler

  Alt 27. Mär 2011, 03:50
ah ja klar !! ^^
danke jetzt seh ichs auch. ...ist wohl doch schon bisl spät
hab jetzt die bedingung für false oben schon mit rein genommen und schon läufts.

Danke !!
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#2

AW: Boolean fehler

  Alt 27. Mär 2011, 03:55
Das muss ich jetzt nicht verstehen oder?
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
Gilmohr

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

AW: Boolean fehler

  Alt 27. Mär 2011, 04:06
nee ^^ ... musst wissen das ich noch delphi anfänger bin.

aber habs jetzt auch ganz ohne boolean hinbekommen weil er zwar die anwendung gestartet, sich dann aber bei der rechnung gehangen hat.
so funktionierts ohne probleme

Code:
procedure TForm1.Button1Click(Sender: TObject);

var a: integer;

begin
  memo1.Clear;
  a := 0 ;
  repeat
    v[a] := FloatToStr((Volumenstrom * 4) / ( StrToInt(d[a]) * 3.1416 * 1000 ));
    memo1.Lines.add(v[a]);
    inc (a);
  until
    a = j

end;
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#4

AW: Boolean fehler

  Alt 27. Mär 2011, 04:21
Und warum keine for-Schleife? Damit sparst du dir das hochzählen von a und die Abbruchbedingung.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
Gilmohr

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

AW: Boolean fehler

  Alt 27. Mär 2011, 04:32
mit For schleife hatte ich probiert...aber das hab ich nicht so hinbekommen ...und nu läufts ja. ob das schön gecodet ist spielt für mich momentan keine rolle. soll nur irgendwie laufen.

@Medium: cool ! danke, werd das auch mal so einbauen.

Geändert von Gilmohr (27. Mär 2011 um 04:35 Uhr)
  Mit Zitat antworten Zitat
Gilmohr

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

AW: Boolean fehler

  Alt 27. Mär 2011, 04:49
J bruach ich unbedingt.
ist keine einfache laufvariable sondern damit werden aus dateien einzelen strings ausgelesen und in nen StringGrid reingeschrieben wo verschiedene sachen aufgelistet werden.

diese berechnung hier ist nue eine von mehreren bie denen j genaus verwendet werden soll.

wollte das erst mit nem memo feld berechnen, aber denke es ist auch besser das im StringGrid zu machen weils aufem bildschirm besser aussieht.

also neue frage
kann ich das auch genaus wie bei dem memo feld machen, dass er mir nen StrinGrid in der nächsten zeile erstellt? und anstatt memo1.clear das er dann den ganzen stringGrid löscht?

Geändert von Gilmohr (27. Mär 2011 um 04:52 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#7

AW: Boolean fehler

  Alt 27. Mär 2011, 04:55
Also das mit der globalen Variable j kommt mir sehr gefährlich vor und schreit gerade zu nach Fehlern, die man nicht findet. Auch solltest du die Oberfläche von der Berechnung und den Daten trennen.

Für eine neue Frage eröffne bitte auch einen neuen Thread.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
Gilmohr

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

AW: Boolean fehler

  Alt 27. Mär 2011, 05:00
das programm gehört zu dem Projekt das ich mal in nem andere thread angesprochen hab und nach hilfe gesucht hatte.
http://www.delphipraxis.net/158789-w...s-hamburg.html

werd dann alles weitere was ich gerade schrieben wollte und den quellcode dazu dann dort posten
  Mit Zitat antworten Zitat
Medium

Registriert seit: 23. Jan 2008
3.687 Beiträge
 
Delphi 2007 Enterprise
 
#9

AW: Boolean fehler

  Alt 27. Mär 2011, 04:22
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
const
  K = 0.00127323954473; // ~= 4 / (PI*1000)
var
  a: integer;
begin
  memo1.Clear;
  for a := 0 to j do
    memo1.Lines.add(FloatToStr((Volumenstrom*K)/StrToInt(d[a])));
end;
Edit: Hallo roter Kasten, hallo Luckie
Edit2: An der Formel bissl gedreht. Weitgehend Kosmetik.
"When one person suffers from a delusion, it is called insanity. When a million people suffer from a delusion, it is called religion." (Richard Dawkins)

Geändert von Medium (27. Mär 2011 um 04:31 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#10

AW: Boolean fehler

  Alt 27. Mär 2011, 04:33
Wo kommt j und das Array d her?

Delphi-Quellcode:
for a := 0 to Length(d) - 1 do
  memo1.Lines.add(FloatToStr((Volumenstrom*K)/StrToInt(d[a])));
Schon brauchen wir J nicht mehr.

Und Laufvariablen benennt man üblicherweise (aus historischen Gründen) mit i.

Und was spricht dagegen das jetzt zu verbessern? Das erhöht die Lesbarkeit- und Verständlichkeit.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 2  1 2      


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 02:26 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz