Dim CV As CustomDialog
Dim SV_FTP As ScrollView
Dim ret As Int
SV_FTP.Initialize(800dip)
SV_FTP.Panel.LoadLayout("ftp_zugang")
SV_FTP.Panel.Tag = "ftp Zugang"
SV_FTP.panel.Height = ftp_chk_SavePW.Top + (ftp_chk_SavePW.Height * 3 ) + 10dip
CV.AddView(SV_FTP,0dip,0dip,100%x,100%y)
'fill with Data.....
ret=CV.Show("FTP Zugang", _
Starter.loc.Localize("txt_Save"), _
Starter.loc.Localize("txt_Cancel"),"",Null)
If ret = DialogResponse.POSITIVE Then