Transparent problem??
- Code: Select all Expand view
- @ 15,10 SAY oSay PROMPT "Türü" OF oDlg PIXEL
@ 13,50 DBCOMBO oT9 Var XT_9;
ITEMS aAVANSTur[1] LIST aAVANSTur[2] ;
Of oDlg Pixel SIZE 70,10 UPDATE
oT9:nClrPane := oDlg:nClrPane
@ 15,140 SAY oSay PROMPT "Kullanıcı" OF oDlg Pixel
@ 13,170 DBCOMBO oT10 Var XT_10 Of oDlg Pixel SIZE 80,10 ALIAS "USERSN_VEREN" ;
LISTFIELD "USN_2" ITEMFIELD "USN_0" UPDATE
oSelf:oCargo:oT10:=oT10
oT10:nClrpANE := oDlg:nClrPane
@ 27,10 SAY oSay PROMPT "Açıklama" OF oDlg PIXEL
@ 25,50 GET oT7 VAR XT_7 OF oDlg PIXEL SIZE 200,10 UPDATE
@ 38,10 SAY oSay PROMPT "Tutar" OF oDlg PIXEL
@ 36,50 GET oT2 VAR XT_2 OF oDlg PIXEL SIZE 80,10 UPDATE PICT "@z 9999,999,999,999.99" RIGHT