Felder füllung

Moin Moin,

ich möchte in meinem Gui den Prozentualen Anteil von automatisch berechnen lassen, nachdem Felder gefüllt worden sind.

Die Summe Berechne ich hiermit

Func Siebanalyse_Rechnung($hWnd, $iMsg, $iwParam, $ilParam)
Local $hWndFrom, $iIDFrom, $iCode, $hWndEdit
Local $hIstrahlmittel_siebanalyse_gewicht_1 = GUICtrlGetHandle($strahlmittel_siebanalyse_gewicht_1), _
$hIstrahlmittel_siebanalyse_gewicht_2 = GUICtrlGetHandle($strahlmittel_siebanalyse_gewicht_2), _
$hIstrahlmittel_siebanalyse_gewicht_3 = GUICtrlGetHandle($strahlmittel_siebanalyse_gewicht_3), _
$hIstrahlmittel_siebanalyse_gewicht_4 = GUICtrlGetHandle($strahlmittel_siebanalyse_gewicht_4), _
$hIstrahlmittel_siebanalyse_gewicht_5 = GUICtrlGetHandle($strahlmittel_siebanalyse_gewicht_5), _
$hIstrahlmittel_siebanalyse_gewicht_6 = GUICtrlGetHandle($strahlmittel_siebanalyse_gewicht_6), _
$hIstrahlmittel_siebanalyse_gewicht_7 = GUICtrlGetHandle($strahlmittel_siebanalyse_gewicht_7), _
$hIstrahlmittel_siebanalyse_gewicht_8 = GUICtrlGetHandle($strahlmittel_siebanalyse_gewicht_8), _
$hIstrahlmittel_siebanalyse_gewicht_boden = GUICtrlGetHandle($strahlmittel_siebanalyse_gewicht_boden), _
$hIstrahlmittel_siebanalyse_gewicht_summe = GUICtrlGetHandle($strahlmittel_siebanalyse_gewicht_summe)
$hWndFrom = $ilParam
$iIDFrom = BitAND($iwParam, 0xFFFF)
$iCode = BitShift($iwParam, 16)
Switch $hWndFrom
Case $hIstrahlmittel_siebanalyse_gewicht_1, $hIstrahlmittel_siebanalyse_gewicht_2, $hIstrahlmittel_siebanalyse_gewicht_3, _
$hIstrahlmittel_siebanalyse_gewicht_4, $hIstrahlmittel_siebanalyse_gewicht_5, $hIstrahlmittel_siebanalyse_gewicht_6, _
$hIstrahlmittel_siebanalyse_gewicht_7, $hIstrahlmittel_siebanalyse_gewicht_8, $hIstrahlmittel_siebanalyse_gewicht_boden, _
$hIstrahlmittel_siebanalyse_gewicht_summe
Switch $iCode
Case $EN_KILLFOCUS
GUICtrlSetData($strahlmittel_siebanalyse_gewicht_summe, GUICtrlRead($strahlmittel_siebanalyse_gewicht_1) + _
GUICtrlRead($strahlmittel_siebanalyse_gewicht_2) + GUICtrlRead($strahlmittel_siebanalyse_gewicht_3) + _
GUICtrlRead($strahlmittel_siebanalyse_gewicht_4) + GUICtrlRead($strahlmittel_siebanalyse_gewicht_5) + _
GUICtrlRead($strahlmittel_siebanalyse_gewicht_6) + GUICtrlRead($strahlmittel_siebanalyse_gewicht_7) + _
GUICtrlRead($strahlmittel_siebanalyse_gewicht_8) + GUICtrlRead($strahlmittel_siebanalyse_gewicht_boden) _
)
EndSwitch
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc

Die Felder der späteren Ausgabe für den Prozentualen Anteil haben folgenden namen.. (den gleichen wie oben nur anstelle gewicht steht anzahl)

z.B. $strahlmittel_siebanalyse_gewicht_1

Es handelt sich hierbei um Input Boxen

Es geht mir um die Füllung der Felder.

Sprich ich habe 2 Felder schreibn in eins was rein und das andere füllt sich, da hängt es bei meinem Script.

Ich habe es schon so probiert, aber kein Erfolg:

$test = GUICtrlRead($strahlmittel_siebanalyse_gewicht_1)
If $test = "" Then
Exit
Else
$strahlmittel_siebanalyse_anteil_1_prozent = $strahlmittel_siebanalyse_gewicht_1 * 100 / $strahlmittel_siebanalyse_gewicht_summe
GUICtrlSetData($strahlmittel_siebanalyse_anteil_1,$strahlmittel_siebanalyse_anteil_1_prozent)

EndIf

Danke, dürfte reichen