Information générale
Catégorie:
Codage, syntaxe et commandes
Titre:
Left hand margin in form
the form below centers the text called m.txt.
Is there a way to keep the text to a left hand margin and to be able perhaps to control the
margin width?
ystr=filetostr('c:\m.txt')
oForm = Createobject('myForm',m.ystr)
Define Class myForm As Form
Add Object myBrowser As OleControl ;
With OleClass='shell.Explorer'
Procedure myBrowser.Refresh
Nodefault
Endproc
Procedure Init(tcStr)
This.myBrowser.Navigate2("about:blank")
Do While This.myBrowser.readystate # 4
Enddo
This.myBrowser.Object.Document.ParentWindow.alert(m.tcStr)
Return .F.
Endproc
Enddefine
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement