Re: Antilogarithmus
Zitat:
Mit Delphi kann man das so errechnen:
Delphi-Quellcode:
Caption := FloatToStr(Power(291.1 / (291.1 + 193.7 + 97.4), 1.5) * Ln(82.4 / 39.2));
|
Re: Antilogarithmus
Zitat:
:oops: Der Logarithmus muss 1,33 sein. Der Wert den ich brauche ist wirklich 0,2628658 . Wie erreiche ich in Delphi dieses ^ ? Mit Power? Wenn ich aber Power ((291,1/(291,1+193,7+97,4)) , 1.5) probiere komme ich auf kein richtiges Ergebnis Uter var habe ich Power so eingebunden:
Delphi-Quellcode:
Mfg
function Power(const Base, Exponent: Extended): Extended;
|
Re: Antilogarithmus
@ Cöster
Danke, hab dein Post jetzt erst gelesen. |
Re: Antilogarithmus
Zitat:
Is nicht bös gemeint, aber beschäftige dich mal mit den Grundlagen, ein paar Einsteiger-Tutorials könnten da schon helfen... Wenn du wenigstens die absoluten Grundlagen drauf hast, kommen manche Fragen erst gar nicht auf und das Programmieren geht schon bedeutend einfacher... mfg Christian |
Re: Antilogarithmus
Zitat:
ja das seh ich auch garnicht als schlecht gemeinte Kritik an. Im Gegenteil, es ist ja berechtigt. Es ist eben nur so das die Faulheit doch oft siegt. Ich weiß ja selbst das es vermeidbar wäre. Es ist halt nur so das ich nur noch das machen will. für die weiteren Formeln reicht mein können ja aus. |
Re: Antilogarithmus
Zitat:
BTT: Hast du jetzt Math eingebunden? mfg Christian |
Re: Antilogarithmus
Hallo
naja ansichtssache. Ich hab noch nichts eingebunden, weiß ja nicht genau wie's geht. Ich mach mich erstmal schlau. |
Re: Antilogarithmus
Hallo
hab jetzt alles umgesetzt was ich wollte. Die Unit math einbinden war ja einfach, ich hab da viel zu schwierig gedacht. Naja. Ein Problem besteht noch:
Delphi-Quellcode:
Im Prinzip soll ein/mehrere Edit(s) und Label(s) sichtbar werden wenn der ItemIndex 1 ist. Ich habe also 2 Items in meiner Combobox und das/die Edits sollen nur sichtbar werden wenn davon das 1. gewählt wurde. Es geht aber so nicht. Soweit klappt es ja, allerdings sollte es een in echtzeit erscheinen und nicht erst wenn ich auf ausrechnen geklickt habe. Wie geht das umzusetzen?
if ComboBox1.ItemIndex = 1
then begin Label251.Visible := true; Edit48.Visible := true; Label258.Visible := True; Edit49.Visible := true; Edit50.Visible := true; Label259.Visible := true; Edit51.Visible := true; Label253.Visible := true; end; |
Re: Antilogarithmus
mit dem OnChange-event von TComboBox
|
Re: Antilogarithmus
Hallo
neues Problem! Ich habe soweit alles realisiert was ich mir in den Kopf gesetzt habe. Jetzt wollte ich nur noch mit einer Checkbox 2 simple Edits editierbar (beschreibbar) machen die Standartmäßig ReadOnly=true haben. Das bekomme ich aber nicht realisiert. Es funktioniert beim ersten einwandfrei aber das 2. lässt sich nicht dazu bequemen.
Delphi-Quellcode:
fällt jemandem was besseres ein?
procedure TForm1.CheckBox4Click(Sender: TObject);
begin if CheckBox4.Checked = True then begin Edit100.ReadOnly := false; Edit101.ReadOnly := false; end else if CheckBox4.Checked = false then begin Edit100.ReadOnly := true; Edit101.ReadOnly := true; end; end; |
Alle Zeitangaben in WEZ +1. Es ist jetzt 13:03 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