In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Property nBorderStyle of TForm
Property nBorderStyle of TForm
Hi,
The Form does not appear if I set nBorderStyle to bsSPLASH or bsNONE, any
other seems to be ok.
Why? I did it it the past but I can't do it right now!
Tks
The Form does not appear if I set nBorderStyle to bsSPLASH or bsNONE, any
other seems to be ok.
Why? I did it it the past but I can't do it right now!
Tks
- ignacio
- Site Admin
- Mensajes: 9256
- Registrado: Lun Abr 06, 2015 8:00 pm
- Ubicación: Madrid, Spain
- Contactar:
Property nBorderStyle of TForm
Roberto,
A sample please. Here is working correctly.
Regards,
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"Roberto" <roberto@top2.com.br> escribió en el mensaje
news:476726dc$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>
> Hi,
>
> The Form does not appear if I set nBorderStyle to bsSPLASH or bsNONE, any
> other seems to be ok.
>
> Why? I did it it the past but I can't do it right now!
>
> Tks
A sample please. Here is working correctly.
Regards,
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"Roberto" <roberto@top2.com.br> escribió en el mensaje
news:476726dc$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>
> Hi,
>
> The Form does not appear if I set nBorderStyle to bsSPLASH or bsNONE, any
> other seems to be ok.
>
> Why? I did it it the past but I can't do it right now!
>
> Tks
Property nBorderStyle of TForm
I have a form with a button. The onclick event is listed below.
When I click the button, the oDlg does not appear. But if I change the property
nBorderStyle to bsDIALOG it works fine.
I tested it in another machine and I got the same behavior.
What i'm doing wrong??
Tks, in advance.
METHOD Button1Click( oSender ) CLASS TForm1
LOCAL oDlg
WITH OBJECT oDlg := TForm():New()
:nBorderStyle := bsSPLASH
:Create()
:ShowModal()
END
RETURN Nil
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> wrote:
>Roberto,
>
>A sample please. Here is working correctly.
>
>Regards,
>
>--
>Ignacio Ortiz de Zúñiga
>http://www.xailer.com
>
>
>"Roberto" <roberto@top2.com.br> escribió en el mensaje
>news:476726dc$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>>
>> Hi,
>>
>> The Form does not appear if I set nBorderStyle to bsSPLASH or bsNONE,
any
>> other seems to be ok.
>>
>> Why? I did it it the past but I can't do it right now!
>>
>> Tks
>
>
When I click the button, the oDlg does not appear. But if I change the property
nBorderStyle to bsDIALOG it works fine.
I tested it in another machine and I got the same behavior.
What i'm doing wrong??
Tks, in advance.
METHOD Button1Click( oSender ) CLASS TForm1
LOCAL oDlg
WITH OBJECT oDlg := TForm():New()
:nBorderStyle := bsSPLASH
:Create()
:ShowModal()
END
RETURN Nil
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> wrote:
>Roberto,
>
>A sample please. Here is working correctly.
>
>Regards,
>
>--
>Ignacio Ortiz de Zúñiga
>http://www.xailer.com
>
>
>"Roberto" <roberto@top2.com.br> escribió en el mensaje
>news:476726dc$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>>
>> Hi,
>>
>> The Form does not appear if I set nBorderStyle to bsSPLASH or bsNONE,
any
>> other seems to be ok.
>>
>> Why? I did it it the past but I can't do it right now!
>>
>> Tks
>
>
Property nBorderStyle of TForm
I have a form with a button. The onclick event is listed below.
When I click the button, the oDlg does not appear. But if I change the property
nBorderStyle to bsDIALOG it works fine.
I tested it in another machine and I got the same behavior.
What i'm doing wrong??
Tks, in advance.
METHOD Button1Click( oSender ) CLASS TForm1
LOCAL oDlg
WITH OBJECT oDlg := TForm():New()
:nBorderStyle := bsSPLASH
:Create()
:ShowModal()
END
RETURN Nil
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> wrote:
>Roberto,
>
>A sample please. Here is working correctly.
>
>Regards,
>
>--
>Ignacio Ortiz de Zúñiga
>http://www.xailer.com
>
>
>"Roberto" <roberto@top2.com.br> escribió en el mensaje
>news:476726dc$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>>
>> Hi,
>>
>> The Form does not appear if I set nBorderStyle to bsSPLASH or bsNONE,
any
>> other seems to be ok.
>>
>> Why? I did it it the past but I can't do it right now!
>>
>> Tks
>
>
When I click the button, the oDlg does not appear. But if I change the property
nBorderStyle to bsDIALOG it works fine.
I tested it in another machine and I got the same behavior.
What i'm doing wrong??
Tks, in advance.
METHOD Button1Click( oSender ) CLASS TForm1
LOCAL oDlg
WITH OBJECT oDlg := TForm():New()
:nBorderStyle := bsSPLASH
:Create()
:ShowModal()
END
RETURN Nil
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> wrote:
>Roberto,
>
>A sample please. Here is working correctly.
>
>Regards,
>
>--
>Ignacio Ortiz de Zúñiga
>http://www.xailer.com
>
>
>"Roberto" <roberto@top2.com.br> escribió en el mensaje
>news:476726dc$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>>
>> Hi,
>>
>> The Form does not appear if I set nBorderStyle to bsSPLASH or bsNONE,
any
>> other seems to be ok.
>>
>> Why? I did it it the past but I can't do it right now!
>>
>> Tks
>
>
- ignacio
- Site Admin
- Mensajes: 9256
- Registrado: Lun Abr 06, 2015 8:00 pm
- Ubicación: Madrid, Spain
- Contactar:
Property nBorderStyle of TForm
Roberto,
Try this:
WITH OBJECT oDlg := TForm():New( Self )
Regards,
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"Roberto" <roberto@top2.com.br> escribió en el mensaje
news:[email=47694479@ozsrv2.ozlan.local...]47694479@ozsrv2.ozlan.local...[/email]
>
> I have a form with a button. The onclick event is listed below.
> When I click the button, the oDlg does not appear. But if I change the
> property
> nBorderStyle to bsDIALOG it works fine.
>
> I tested it in another machine and I got the same behavior.
>
> What i'm doing wrong??
>
> Tks, in advance.
>
> METHOD Button1Click( oSender ) CLASS TForm1
> LOCAL oDlg
>
> WITH OBJECT oDlg := TForm():New()
> :nBorderStyle := bsSPLASH
> :Create()
> :ShowModal()
> END
>
> RETURN Nil
>
>
> "Ignacio Ortiz de Zúñiga" <NoName@xailer.com> wrote:
>>Roberto,
>>
>>A sample please. Here is working correctly.
>>
>>Regards,
>>
>>--
>>Ignacio Ortiz de Zúñiga
>>http://www.xailer.com
>>
>>
>>"Roberto" <roberto@top2.com.br> escribió en el mensaje
>>news:476726dc$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>>>
>>> Hi,
>>>
>>> The Form does not appear if I set nBorderStyle to bsSPLASH or bsNONE,
> any
>>> other seems to be ok.
>>>
>>> Why? I did it it the past but I can't do it right now!
>>>
>>> Tks
>>
>>
>
Try this:
WITH OBJECT oDlg := TForm():New( Self )
Regards,
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"Roberto" <roberto@top2.com.br> escribió en el mensaje
news:[email=47694479@ozsrv2.ozlan.local...]47694479@ozsrv2.ozlan.local...[/email]
>
> I have a form with a button. The onclick event is listed below.
> When I click the button, the oDlg does not appear. But if I change the
> property
> nBorderStyle to bsDIALOG it works fine.
>
> I tested it in another machine and I got the same behavior.
>
> What i'm doing wrong??
>
> Tks, in advance.
>
> METHOD Button1Click( oSender ) CLASS TForm1
> LOCAL oDlg
>
> WITH OBJECT oDlg := TForm():New()
> :nBorderStyle := bsSPLASH
> :Create()
> :ShowModal()
> END
>
> RETURN Nil
>
>
> "Ignacio Ortiz de Zúñiga" <NoName@xailer.com> wrote:
>>Roberto,
>>
>>A sample please. Here is working correctly.
>>
>>Regards,
>>
>>--
>>Ignacio Ortiz de Zúñiga
>>http://www.xailer.com
>>
>>
>>"Roberto" <roberto@top2.com.br> escribió en el mensaje
>>news:476726dc$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>>>
>>> Hi,
>>>
>>> The Form does not appear if I set nBorderStyle to bsSPLASH or bsNONE,
> any
>>> other seems to be ok.
>>>
>>> Why? I did it it the past but I can't do it right now!
>>>
>>> Tks
>>
>>
>
Property nBorderStyle of TForm
Dear Ignacio,
I tryed, same result. I tryed too WITH OBJECT oDlg := TForm():New(Application:oMainForm)...
nothing.
:o(
tks,
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> wrote:
>Roberto,
>
>Try this:
>
>WITH OBJECT oDlg := TForm():New( Self )
>
>Regards,
>
>--
>Ignacio Ortiz de Zúñiga
>http://www.xailer.com
>
>
>"Roberto" <roberto@top2.com.br> escribió en el mensaje
>news:[email=47694479@ozsrv2.ozlan.local...]47694479@ozsrv2.ozlan.local...[/email]
>>
>> I have a form with a button. The onclick event is listed below.
>> When I click the button, the oDlg does not appear. But if I change the
>> property
>> nBorderStyle to bsDIALOG it works fine.
>>
>> I tested it in another machine and I got the same behavior.
>>
>> What i'm doing wrong??
>>
>> Tks, in advance.
>>
>> METHOD Button1Click( oSender ) CLASS TForm1
>> LOCAL oDlg
>>
>> WITH OBJECT oDlg := TForm():New()
>> :nBorderStyle := bsSPLASH
>> :Create()
>> :ShowModal()
>> END
>>
>> RETURN Nil
>>
>>
>> "Ignacio Ortiz de Zúñiga" <NoName@xailer.com> wrote:
>>>Roberto,
>>>
>>>A sample please. Here is working correctly.
>>>
>>>Regards,
>>>
>>>--
>>>Ignacio Ortiz de Zúñiga
>>>http://www.xailer.com
>>>
>>>
>>>"Roberto" <roberto@top2.com.br> escribió en el mensaje
>>>news:476726dc$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>>>>
>>>> Hi,
>>>>
>>>> The Form does not appear if I set nBorderStyle to bsSPLASH or bsNONE,
>> any
>>>> other seems to be ok.
>>>>
>>>> Why? I did it it the past but I can't do it right now!
>>>>
>>>> Tks
>>>
>>>
>>
>
>
I tryed, same result. I tryed too WITH OBJECT oDlg := TForm():New(Application:oMainForm)...
nothing.
:o(
tks,
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> wrote:
>Roberto,
>
>Try this:
>
>WITH OBJECT oDlg := TForm():New( Self )
>
>Regards,
>
>--
>Ignacio Ortiz de Zúñiga
>http://www.xailer.com
>
>
>"Roberto" <roberto@top2.com.br> escribió en el mensaje
>news:[email=47694479@ozsrv2.ozlan.local...]47694479@ozsrv2.ozlan.local...[/email]
>>
>> I have a form with a button. The onclick event is listed below.
>> When I click the button, the oDlg does not appear. But if I change the
>> property
>> nBorderStyle to bsDIALOG it works fine.
>>
>> I tested it in another machine and I got the same behavior.
>>
>> What i'm doing wrong??
>>
>> Tks, in advance.
>>
>> METHOD Button1Click( oSender ) CLASS TForm1
>> LOCAL oDlg
>>
>> WITH OBJECT oDlg := TForm():New()
>> :nBorderStyle := bsSPLASH
>> :Create()
>> :ShowModal()
>> END
>>
>> RETURN Nil
>>
>>
>> "Ignacio Ortiz de Zúñiga" <NoName@xailer.com> wrote:
>>>Roberto,
>>>
>>>A sample please. Here is working correctly.
>>>
>>>Regards,
>>>
>>>--
>>>Ignacio Ortiz de Zúñiga
>>>http://www.xailer.com
>>>
>>>
>>>"Roberto" <roberto@top2.com.br> escribió en el mensaje
>>>news:476726dc$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>>>>
>>>> Hi,
>>>>
>>>> The Form does not appear if I set nBorderStyle to bsSPLASH or bsNONE,
>> any
>>>> other seems to be ok.
>>>>
>>>> Why? I did it it the past but I can't do it right now!
>>>>
>>>> Tks
>>>
>>>
>>
>
>
Property nBorderStyle of TForm
Roberto,
the property nBorderStyle *has* to be assigned before the form is created,
that is, before calling New(). So, your sample should work as:
METHOD Button1Click( oSender ) CLASS TForm1
LOCAL oDlg
WITH OBJECT oDlg := TForm()
:nBorderStyle := bsSPLASH
:New()
:ShowModal()
END
RETURN Nil
--
Regards,
Jose F. Gimenez
http://www.xailer.com
http://www.xailer.info
the property nBorderStyle *has* to be assigned before the form is created,
that is, before calling New(). So, your sample should work as:
METHOD Button1Click( oSender ) CLASS TForm1
LOCAL oDlg
WITH OBJECT oDlg := TForm()
:nBorderStyle := bsSPLASH
:New()
:ShowModal()
END
RETURN Nil
--
Regards,
Jose F. Gimenez
http://www.xailer.com
http://www.xailer.info
Property nBorderStyle of TForm
Tks, but did not solve.
See test1.zip
"Jose F. Gimenez" <jfgimenez@wanadoo.es> wrote:
>Roberto,
>
>the property nBorderStyle *has* to be assigned before the form is created,
>that is, before calling New(). So, your sample should work as:
>
> METHOD Button1Click( oSender ) CLASS TForm1
> LOCAL oDlg
>
> WITH OBJECT oDlg := TForm()
> :nBorderStyle := bsSPLASH
> :New()
> :ShowModal()
> END
>
> RETURN Nil
>
>--
>Regards,
>
>Jose F. Gimenez
>http://www.xailer.com
>http://www.xailer.info
>
>
See test1.zip
"Jose F. Gimenez" <jfgimenez@wanadoo.es> wrote:
>Roberto,
>
>the property nBorderStyle *has* to be assigned before the form is created,
>that is, before calling New(). So, your sample should work as:
>
> METHOD Button1Click( oSender ) CLASS TForm1
> LOCAL oDlg
>
> WITH OBJECT oDlg := TForm()
> :nBorderStyle := bsSPLASH
> :New()
> :ShowModal()
> END
>
> RETURN Nil
>
>--
>Regards,
>
>Jose F. Gimenez
>http://www.xailer.com
>http://www.xailer.info
>
>
Property nBorderStyle of TForm
Roberto,
> Tks, but did not solve.
>
> See test1.zip
You forgoted to attach the file.
--
Regards,
Jose F. Gimenez
http://www.xailer.com
http://www.xailer.info
> Tks, but did not solve.
>
> See test1.zip
You forgoted to attach the file.
--
Regards,
Jose F. Gimenez
http://www.xailer.com
http://www.xailer.info
Property nBorderStyle of TForm
Sorry, here is it.
"Jose F. Gimenez" <jfgimenez@wanadoo.es> wrote:
>Roberto,
>
>> Tks, but did not solve.
>>
>> See test1.zip
>
>You forgoted to attach the file.
>
>--
>Regards,
>
>Jose F. Gimenez
>http://www.xailer.com
>http://www.xailer.info
>
>
"Jose F. Gimenez" <jfgimenez@wanadoo.es> wrote:
>Roberto,
>
>> Tks, but did not solve.
>>
>> See test1.zip
>
>You forgoted to attach the file.
>
>--
>Regards,
>
>Jose F. Gimenez
>http://www.xailer.com
>http://www.xailer.info
>
>
Property nBorderStyle of TForm
I attached the file test1.zip but it does no appear. Anyway, there is just
a form and a button inside it.
/*
* Project: Test1
* File: Form2.prg
* Description:
* Author:
* Date: 12-19-2007
*/
#include "Xailer.ch"
CLASS TForm2 FROM TForm
COMPONENT oButton1
METHOD CreateForm()
METHOD Button1Click( oSender )
ENDCLASS
#include "Form2.xfm"
//---------------------------------------------------------- --------------------
METHOD Button1Click( oSender ) CLASS TForm2
LOCAL oDlg
WITH OBJECT oDlg := TForm()
:nBorderStyle := bsNONE // or bsSPLASH does not work, only bsDIALOG,
bsTOOLTIP works fine
:New(Self)
:Create()
:lCentered := .T.
:ShowModal()
END
RETURN Nil
//---------------------------------------------------------- --------------------
"Jose F. Gimenez" <jfgimenez@wanadoo.es> wrote:
>Roberto,
>
>> Tks, but did not solve.
>>
>> See test1.zip
>
>You forgoted to attach the file.
>
>--
>Regards,
>
>Jose F. Gimenez
>http://www.xailer.com
>http://www.xailer.info
>
>
a form and a button inside it.
/*
* Project: Test1
* File: Form2.prg
* Description:
* Author:
* Date: 12-19-2007
*/
#include "Xailer.ch"
CLASS TForm2 FROM TForm
COMPONENT oButton1
METHOD CreateForm()
METHOD Button1Click( oSender )
ENDCLASS
#include "Form2.xfm"
//---------------------------------------------------------- --------------------
METHOD Button1Click( oSender ) CLASS TForm2
LOCAL oDlg
WITH OBJECT oDlg := TForm()
:nBorderStyle := bsNONE // or bsSPLASH does not work, only bsDIALOG,
bsTOOLTIP works fine
:New(Self)
:Create()
:lCentered := .T.
:ShowModal()
END
RETURN Nil
//---------------------------------------------------------- --------------------
"Jose F. Gimenez" <jfgimenez@wanadoo.es> wrote:
>Roberto,
>
>> Tks, but did not solve.
>>
>> See test1.zip
>
>You forgoted to attach the file.
>
>--
>Regards,
>
>Jose F. Gimenez
>http://www.xailer.com
>http://www.xailer.info
>
>
Property nBorderStyle of TForm
sorry, but do you have any other suggestion?
Tks,
"Jose F. Gimenez" <jfgimenez@wanadoo.es> wrote:
>Roberto,
>
>> Tks, but did not solve.
>>
>> See test1.zip
>
>You forgoted to attach the file.
>
>--
>Regards,
>
>Jose F. Gimenez
>http://www.xailer.com
>http://www.xailer.info
>
>
Tks,
"Jose F. Gimenez" <jfgimenez@wanadoo.es> wrote:
>Roberto,
>
>> Tks, but did not solve.
>>
>> See test1.zip
>
>You forgoted to attach the file.
>
>--
>Regards,
>
>Jose F. Gimenez
>http://www.xailer.com
>http://www.xailer.info
>
>
Property nBorderStyle of TForm
Roberto,
sorry for the delay.
Please, try to upload the file to any free site and post here the url. F.e.,
http://www.senduit.com allows to upload files for upto 1 week.
--
Regards,
Jose F. Gimenez
http://www.xailer.com
http://www.xailer.info
sorry for the delay.
Please, try to upload the file to any free site and post here the url. F.e.,
http://www.senduit.com allows to upload files for upto 1 week.
--
Regards,
Jose F. Gimenez
http://www.xailer.com
http://www.xailer.info