Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Dont Allow Application To Close When Report is previewed
Message
From
21/01/2000 12:45:39
Cetin Basoz
Engineerica Inc.
Izmir, Turkey
 
General information
Forum:
Visual FoxPro
Category:
Reports & Report designer
Miscellaneous
Thread ID:
00320807
Message ID:
00321007
Views:
23
>>Bret,
>>Also try this modal approach (eliminates playing with _screen) :
>>
>>
oForm = createobject("myModalReport","myReport")
>>oForm.show()
>>return
>>
>>define class myModalReport as Form
>>  WindowState = 2
>>  Caption = "My report"
>>*  .TitleBar = 0 && Completely removes titlebar
>>  Minbutton  = .f.
>>  MaxButton = .f.
>>  Movable = .f.
>>  HalfHeightCaption = .t.
>>  BorderStyle = 2 && Fixed dialog
>>  BackColor = rgb(255,255,255)
>>  WindowType = 1 && Modal
>>  RepName = ""
>>  procedure init
>>   lparameters tcReportName
>>   this.RepName = tcReportName
>>  endproc
>>  procedure activate
>>	Report form (this.RepName) prev window (this.Name)
>>	this.release
>>  endproc
>>enddefine
Cetin
>
>Since this is inside a form's method, wouldn't the define class be illegal.


Yes it would be. I sent it this way to be able to post online. But you could create the class visually or just put define class part to prg :

set procedure to myClassDefFile additive
oForm = create...

Or if you just created is visually and saved as a form :
do form myModalReportForm with "myreport"

Cetin
Çetin Basöz

The way to Go
Flutter - For mobile, web and desktop.
World's most advanced open source relational database.
.Net for foxheads - Blog (main)
FoxSharp - Blog (mirror)
Welcome to FoxyClasses

LinqPad - C#,VB,F#,SQL,eSQL ... scratchpad
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform