Como vai dasiguer ... legao?
Dont know if you are looking for this but might help.
Code:
Break On
$Form = CreateObject('Kixtart.Form')
$Form.BackColor = 212,208,200
$Form.ForeColor = 0,0,0
$Form.Left = 79
$Form.Top = 25
$Form.Height = 333
$Form.Width = 456
$Form.FontSize = 8.25
$Form.Text = "Welcome.."
$Form.FormBorderStyle = 4
;-----------------------------------------------------
$PictureBox1 = $Form.PictureBox
$PictureBox1.BackColor = 128,64,64
$PictureBox1.Left = 33
$PictureBox1.Top = 26
$PictureBox1.Height = 183
$PictureBox1.Width = 380
$PictureBox1.Picture = "c:\temp\myimage.bmp" ;here you put the image reference
;-----------------------------------------------------
$Label1 = $Form.Label
$Label1.ForeColor = 0,0,0
$Label1.Left = 148
$Label1.Top = 241
$Label1.Height = 50
$Label1.Width = 200
$Label1.FontBold = "True"
$Label1.FontItalic = "True"
$Label1.FontName = "Arial"
$Label1.FontSize = 20
$Label1.Text = "Welcome!!"
;-----------------------------------------------------
$Form.Show
While $Form.Visible
$=Execute($Form.DoEvents())
Loop
Exit 1
Remembre to use a BMP image.
MERCOSUR !!
Edited by jose3 (2003-11-27 09:43 PM)
_________________________
Life is fine.