Forum: Programmieren allgemein
by Cöster,
6. Jan 2007
Öffne eine neue Anwendung und füge dort nur diesen OnClick-Code ein: Es funktioniert. Der Fehler liegt also nicht in dem Code, den wir jetzt kennen, weswegen wir dir so nicht helfen können.
PS: Mach mal lieber nen neuen Thread dafür auf, ist ja ne ganz andere Frage als deine vorherige.
Forum: Programmieren allgemein
by Cöster,
6. Jan 2007
Was passiert denn bzw. was passiert nicht? Der Fehler liegt wahrscheinlich woanders, denn wenn man den Code in einer sonst leeren Anwendung einbaut, funzt's. Du könntest den Code noch verkürzen, was das Problem aber nicht lösen wird:
procedure TForm1.CheckBox1Click(Sender: TObject);
begin
Edit1.ReadOnly := not CheckBox1.Checked;
Edit2.ReadOnly := Edit1.ReadOnly;
end;
Forum: Programmieren allgemein
by Cöster,
27. Okt 2006
Wieso? Wenn auf der rechten Seite in der Mitte ein Mal-Zeichen steht, kommt tatsächlich 0,26 raus.
Mit Delphi kann man das so errechnen:
Caption := FloatToStr(Power(291.1 / (291.1 + 193.7 + 97.4), 1.5) * Ln(82.4 / 39.2));
Forum: Programmieren allgemein
by Cöster,
26. Okt 2006
Was genau verstehst du unter Antilogarithmus? Laut Wikipedia ist der Antilogarithmus die Exponentialfunktion zur Basis 10, also 10^x
wie ist das eine Rechnung? 534.67*e*0,0485*10?
Dadurch erhälst du nur den natürlichen Logarithmus.