Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Ereignisse (https://www.delphipraxis.net/72843-ereignisse.html)

Cr3at0r 7. Jul 2006 20:35


Ereignisse
 
Also wenn ich zb 2 Edit Bosen hab und darunter ein Label wo das Ergebnis stehen soll, welches Ereignis ist es wenn es automatisch immer aktualisiert wird, wenn ein Wert einer der Boxen sich ändert? Sodass man zb keine Button drücken muss.

MfG

3_of_8 7. Jul 2006 20:36

Re: Ereignisse
 
Probiers mit TEdit.OnChange.

Die Muhkuh 7. Jul 2006 20:36

Re: Ereignisse
 
Hi,

Delphi-Referenz durchsuchenOnKeyPress
Delphi-Referenz durchsuchenOnKeyDown
Delphi-Referenz durchsuchenOnKeyUp

Cr3at0r 7. Jul 2006 20:42

Re: Ereignisse
 
Zitat:

Zitat von 3_of_8
Probiers mit TEdit.OnChange.

Sehe ich das richtig das ich des bei allen Edit Boxen?

Wie würde des zb. hier bei aussehen:

Delphi-Quellcode:
begin
prodiri := strtofloat(edit1.Text);
prodhol := strtofloat(edit4.text);
prodo2 := strtofloat(edit5.text);
bbt := strtofloat(edit2.text);
wk := strtofloat(edit3.text);

iri := prodiri * (Power(1 + 5/100, bbt));
hol := prodhol * (Power(1 + 5/100, bbt));
o2 := prodo2 * (Power(1 + 5/100,wk));

iri2 := iri + (iri/100*55);
hol2 := hol + (hol/100*55);
o22 := o2 + (o2/100*55);

label1.Caption := floattostr(iri2);
label2.Caption := floattostr(hol2);
label4.Caption := floattostr(o22);
end;

mkinzler 7. Jul 2006 20:47

Re: Ereignisse
 
Zitat:

Sehe ich das richtig das ich des bei allen Edit Boxen?
???
Zitat:

Wie würde des zb. hier bei aussehen
Ich verstehe irgendwie deine Frage nicht.

Zacherl 7. Jul 2006 20:57

Re: Ereignisse
 
Du musst den Code zur Berechnung ins OnChange Event des Edits reinschreiben.


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:35 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