Search found 56 matches

by yury
Mon Sep 15, 2008 5:24 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Detecting the printer page size
Replies: 1
Views: 1222

hello Mr.Marco, I think no there is a native function for this, but see the function PrnGetPaper()... I hope that helps you... //------------------------------------------------------------------------------------------ Function Test() oPrinter = PrintBegin('Test',.T.,.T.,,.T.) msginfo( PrnGetPaper(...
by yury
Fri Sep 05, 2008 8:05 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Save Screen
Replies: 3
Views: 797

Code: Select all

cBmpFile = 'c:\myscreen.bmp'

if oWnd:SaveToBmp( cBmpFile )
   ? 'Done ! Saved in '+cBmpFile
else
   ? 'Error ! Don't save'
endif
regards (um abraço)
by yury
Fri Sep 05, 2008 11:24 am
Forum: FiveWin for Harbour/xHarbour
Topic: Treeview with Imagelist dont show the bitmap
Replies: 2
Views: 760

many thanks for your suport, Mr.Antonio ! I used your example, it's ok, but I believe that found the "problem" in my code: When the bitmap dont have the same widht and height the imagelist control dont shows in treeview... In my tests I used the bitmap with 0.48 x 0.42 and dont work, but a...
by yury
Mon Sep 01, 2008 8:13 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Treeview with Imagelist dont show the bitmap
Replies: 2
Views: 760

Treeview with Imagelist dont show the bitmap

Hi everyone, The code above should show the bitmap LOGOFF in prompt Level1 , ARQMIN in prompt Level2 and KEY_UP in prompt Level3... But only show bitmap in first prompt, in the others show a blank space DEFINE WINDOW oWndx FROM 1, 1 TO 31,95 TITLE 'Test' COLOR CLR_BLACK,CLR_WHITE DEFINE BITMAP oBMP1...
by yury
Thu Aug 21, 2008 6:43 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Method print() TWindow = diferences between Laser x Deskjet
Replies: 4
Views: 1389

Hello Mr.James,

I try this way:

Code: Select all

obj:Print(oPrinter, 1, 1, 6) 
But don´t work, print a blank sheet...

I thank you very much your help, but I quit...

I will think other way to print the dialog/screen...

Thank you again

Regards
by yury
Wed Aug 20, 2008 7:49 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Method print() TWindow = diferences between Laser x Deskjet
Replies: 4
Views: 1389

Hello Mr.James, thanks for your suport ! I get your trick, it´s OK, but the :Print() allow you pass the <nScale> parameter... In fact the :Hardcopy() calls :Print() internally... I try your sugestion, calls :Hardcopy with a parameter <nScale> of the default printer... And I try this way too: LOCAL o...
by yury
Wed Aug 20, 2008 4:52 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Method print() TWindow = diferences between Laser x Deskjet
Replies: 4
Views: 1389

Method print() TWindow = diferences between Laser x Deskjet

Hi everyone ! This code below prints the dialog (obj is the parameter)... In deskjet printer (300 dpi) works fine, but in laser printer (600 dpi) it´s not OK, the image on the paper is too small It´s possible fixed this ? FUNCTION Printer_Dlg(obj) LOCAL oPrinter oPrinter := PrintBegin(obj:cTitle,.T....
by yury
Mon Aug 04, 2008 7:44 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Listbox never hits EOF oLbx:ReFresh()
Replies: 5
Views: 1156

hello, try this way: #include "FiveWin.ch" Function Act_Lbx() SET DELETE ON cFile = 'c:\temp\MyDBF.DBF' DBUSEAREA(.T.,'DBFNTX',cFile,'temp',.F.) if NETERR() ? 'Error. Abort...' RETURN endif bAction = {|| xDel() } select temp go top define dialog oDlg from 01,01 to 32,100 title 'Lines' @ 01...
by yury
Mon Aug 04, 2008 2:39 pm
Forum: FiveWin for Harbour/xHarbour
Topic: A bug in a disable get
Replies: 11
Views: 1898

Yuri, Your solution is fine, because there is no way to know where the focus should go once you open a dialogbox on top of the controls. Windows API uses GetNextDlgTabItem() on a standard change focus sequence: http://msdn.microsoft.com/en-us/library/ms645495(VS.85).aspx but if such sequence is alt...
by yury
Mon Aug 04, 2008 1:15 pm
Forum: FiveWin for Harbour/xHarbour
Topic: A bug in a disable get
Replies: 11
Views: 1898

Hi everyone, With a setfocus in the valid function directing the cursor for the third get it's works, but I think that it's not correct, because should be a natural behavior of FWH when the next control is a get and it's enable... for now I solved this way, but I think that should be receive the pro...
by yury
Mon Aug 04, 2008 11:53 am
Forum: FiveWin for Harbour/xHarbour
Topic: A bug in a disable get
Replies: 11
Views: 1898

Mr. Antonio and Mr.NageswaraRao, thanks for your suport ! The problem happens with any dialog open in a valid function, in exemple above I used a msginfo for a test, but if were a dialog (define dialog...) happen the same error... If no exists dialog or message in the valid function it's works fine,...
by yury
Fri Aug 01, 2008 8:07 pm
Forum: FiveWin for Harbour/xHarbour
Topic: A bug in a disable get
Replies: 11
Views: 1898

A bug in a disable get

Hi everyone This code below have a 3 gets, all enabled in first moment The first get have a valid calling a function and this one show a message, set the variable lWhen2 with .F. (disabling the second get) and returns .T. But the cursor dont focus in the third get, it´s back to the first please, try...
by yury
Fri Jul 18, 2008 7:32 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Download internet file without interference
Replies: 31
Views: 8928

Patrick, perfect !

thanks very much

regards
by yury
Mon Jul 14, 2008 4:35 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Download internet file without interference
Replies: 31
Views: 8928

Download internet file without interference

Hi everyone, How can I download a file in "http:\\200.150.20.14\f_080714.xml" and save the same in folder "f:\Sistem\xml\" without interference of user ? I am using: cLink = "http:\\200.150.20.14\f_080714.xml" ShellExecute(GetActiveWindow(),nil,cLink,"","...