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.

Property nBorderStyle of TForm

XBase programming language in english
Roberto
Posts: 177
Joined: Tue Oct 16, 2007 11:53 pm

Property nBorderStyle of TForm

Postby Roberto » Tue Dec 18, 2007 2:48 am

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
User avatar
ignacio
Site Admin
Posts: 8535
Joined: Mon Apr 06, 2015 8:00 pm
Location: Madrid, Spain
Contact:

Property nBorderStyle of TForm

Postby ignacio » Tue Dec 18, 2007 9:51 am

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$1@ozsrv2.ozlan.local...
>
> 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 Ortiz de Zúñiga
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
Roberto
Posts: 177
Joined: Tue Oct 16, 2007 11:53 pm

Property nBorderStyle of TForm

Postby Roberto » Wed Dec 19, 2007 5:17 pm

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$1@ozsrv2.ozlan.local...
>>
>> 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
>
>
Roberto
Posts: 177
Joined: Tue Oct 16, 2007 11:53 pm

Property nBorderStyle of TForm

Postby Roberto » Wed Dec 19, 2007 5:19 pm

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$1@ozsrv2.ozlan.local...
>>
>> 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
>
>
User avatar
ignacio
Site Admin
Posts: 8535
Joined: Mon Apr 06, 2015 8:00 pm
Location: Madrid, Spain
Contact:

Property nBorderStyle of TForm

Postby ignacio » Wed Dec 19, 2007 5:46 pm

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:47694479@ozsrv2.ozlan.local...
>
> 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$1@ozsrv2.ozlan.local...
>>>
>>> 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 Ortiz de Zúñiga
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
Roberto
Posts: 177
Joined: Tue Oct 16, 2007 11:53 pm

Property nBorderStyle of TForm

Postby Roberto » Wed Dec 19, 2007 7:33 pm

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:47694479@ozsrv2.ozlan.local...
>>
>> 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$1@ozsrv2.ozlan.local...
>>>>
>>>> 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
>>>
>>>
>>
>
>
User avatar
jfgimenez
Site Admin
Posts: 5619
Joined: Mon Apr 06, 2015 8:48 pm
Contact:

Property nBorderStyle of TForm

Postby jfgimenez » Wed Dec 19, 2007 7:45 pm

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
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
Roberto
Posts: 177
Joined: Tue Oct 16, 2007 11:53 pm

Property nBorderStyle of TForm

Postby Roberto » Wed Dec 19, 2007 9:25 pm

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
>
>
User avatar
jfgimenez
Site Admin
Posts: 5619
Joined: Mon Apr 06, 2015 8:48 pm
Contact:

Property nBorderStyle of TForm

Postby jfgimenez » Wed Dec 19, 2007 9:47 pm

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
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
Roberto
Posts: 177
Joined: Tue Oct 16, 2007 11:53 pm

Property nBorderStyle of TForm

Postby Roberto » Fri Dec 21, 2007 8:29 pm

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
>
>
Roberto
Posts: 177
Joined: Tue Oct 16, 2007 11:53 pm

Property nBorderStyle of TForm

Postby Roberto » Fri Dec 21, 2007 8:49 pm

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
>
>
Roberto
Posts: 177
Joined: Tue Oct 16, 2007 11:53 pm

Property nBorderStyle of TForm

Postby Roberto » Wed Dec 26, 2007 11:42 am

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
>
>
User avatar
jfgimenez
Site Admin
Posts: 5619
Joined: Mon Apr 06, 2015 8:48 pm
Contact:

Property nBorderStyle of TForm

Postby jfgimenez » Sat Dec 29, 2007 9:44 pm

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
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info

Return to “English”