autoit inputtaki bir sayıyı ondalık sayı ile carpmak

[darendeli]

autoit inputtaki bir sayıyı ondalık sayı ile carpmak Denemeler Yaptım ama bunu basaramadım normal sayılarda sıkıntı yok ama ondalık ile yapamadım 0,43 sayısı ile carpımını yapamadım inputa yazılan sayının.....Yardımlar icin simdiden teşekkürler Yeni Bir Program Gelicek Yaptıgımda...

[BlueLife]

@darendeli

Autoitte ondalık sayılarda , yerine . kullanmalısın. Yani 0,43 yerine 0.43 olarak kullanmalısın.
Ufak bir örnek hazırladım incelersin.

Kod: Tümünü seç

Local $Form1 = GUICreate("Form1", 380, 120)
GUISetFont(10)
Local $Input1 = GUICtrlCreateInput("0,43", 25, 25, 100, 21)
GUICtrlCreateLabel("*",130, 27, 5, 21,512)
Local $Input2 = GUICtrlCreateInput("25", 140, 25, 100, 21)
GUICtrlCreateLabel("=",245, 27, 5, 21,512)
Local $Input3 = GUICtrlCreateInput("", 260, 25, 100, 21,0x0800)
GUICtrlSetBkColor($Input3,0xFFFFFF)
GUISetState(@SW_SHOW)

Local $Read_1,$Read_2,$tNum_1,$tNum_2

While 1
	Switch GUIGetMsg()
		Case -3
			Exit
	EndSwitch
	$tNum_1 = _Read_Number($Input1)
	$tNum_2 = _Read_Number($Input2)
	If $tNum_1 <> $Read_1 Or $tNum_2 <> $Read_2 Then
		$Read_1 = $tNum_1
		$Read_2 = $tNum_2

		GUICtrlSetData($Input3,$Read_1*$Read_2)
	EndIf
WEnd

Func _Read_Number($CtrlID)
	Return Number(StringStripWS(StringReplace(GUICtrlRead($CtrlID),",","."),3))
EndFunc

[darendeli]

Teşekkürler Yardımların icin BlueLife . Yapmamıstım....

[darendeli]

Tamam Sorun Cözülmüstür Program Bitiminde Baslasılacaktır Yarın....