Einzelnen Beitrag anzeigen

Benutzerbild von nailor
nailor

Registriert seit: 12. Dez 2002
Ort: Karlsruhe
1.989 Beiträge
 
#45
  Alt 15. Jan 2003, 14:58
Zitat von Hansa:
Das hier ist noch schlimmer :

Code:
procedure TForm1.ErgebnisChange(Sender: TObject);
begin
if checkbox1.checked then
* btemp := b 'Wenn checkbox angehakt muss b mit pi multipliziert werden;
else
* btemp := floattostr(3,14159 * strtofloat(b));
DeinLabel.Caption := 'f(x) =' a + '*sin(btemp(x-' + (-fi) + '))';
guck Dir mal Dein a und b an. Die stehen einfach so im Raum rum!

Gruß
Hansa
Die Prozedur erinnert mich sehr an eine von mir, die ich unter http://www.delphipraxis.net/viewtopic.php?t=2411 gepostet habe. Da waren das string-Variablen und somit an der Stelle völlig OK. Wenn jetzt in dem Projekt die Variablen aber nicht deklariert sind, dann wird es auch nicht gehen...
Michael N.
http://nailor.devzero.de/code/sharpmath/testing/ --- Tests, Feedback, Anregungen, ... aller Art sehr willkommen!
::: don't try so hard - it'll happen for a reason :::
  Mit Zitat antworten Zitat