FiveTech Software tech support forums

... of the command separated with commas,               for example, the command to reset Epson printers should               be: "27,69" SetCoors(r,c) Let you change the current row and col is the equivalent of               SetPrc() of Ca-Clipper NewLine()     Increments the current ...

Leandro, solo tienes que modificar la linea del Dock1 que define la altura WITH OBJECT oDock1 :SetHeightCaption( 40 ) :SetCoors( { | o | 10 }, { | o | 10 }, ; { | o | Int( o:oWnd:nHeight / 2 ) + 54 }, ; { | o | Int( o:oWnd:nWidth / 2 ) - XEVal( o:nLeft, o ) } ) En este caso se está ...

... Es realmente sencillo referenciar los objetos al contenedor principal, y al resto de objetos ya situados si te fijas un poco en el metodo SetCoors() Lo primero es entender que las coordenadas pueden ser absolutas, o sea numeros tal y como estamos actualmente acostumbrados a definir: :nTop ...

... problema es que me queda un espacio a la derecha , como si aun estuvieran los paneles 4 y 5. Me podrias explicar un poco como funciona el tema de setcoors y también para que sirve la funcion GetSysMetrics(). https://hymplus.com/forofw/tdocpanel.png De antemano gracias

... content the ascii values of the command separated with commas, for example, the command to reset Epson printers should be: "27,69" SetCoors(r,c) Let you change the current row and col is the equivalent of SetPrc() of Ca-Clipper NewLine() Increments the current row Write(cText) Prints ...

... content the ascii values of the command separated with commas, for example, the command to reset Epson printers should be: "27,69" SetCoors(r,c) Let you change the current row and col is the equivalent of SetPrc() of Ca-Clipper NewLine() Increments the current row Write(cText) Prints ...

Hi Antonio , I try to make some test on FLH this morning. After install UBUNTU 14.04 LTS and all the packages needs to compile FLH i've a lot of errors like this: compiling... Harbour 2.1.0rc2 (Rev. 16643) Copyright (c) 1999-2011, http://harbour-project.org/ Compiling 'tutor01.prg'... Lines 1097, Fu...

Ok I found SetCoors(), and CoorsUpdate() which contains the Function GetCoors() in it. SetCoors() is a method of the TWindow class. Thank you, I will give them a shot. James I also discovered this, below is the code to the Method ...

... content the ascii values of the command separated with commas, for example, the command to reset Epson printers should be: "27,69" SetCoors(r,c) Let you change the current row and col is the equivalent of SetPrc() of Ca-Clipper NewLine() Increments the current row Write(cText) Prints ...

... New(cPort,cVerUSB) CONSTRUCTOR METHOD End() METHOD StartPage() VIRTUAL METHOD EndPage() METHOD Command(xPar1, xPar2, xPar3, xPar4, xPar5) METHOD SetCoors(nRow, nCol) METHOD NewLine() INLINE (::cBuffer += CRLF ,; ::nRow++ ,; ::nCol := 0 ) METHOD Write(cText, lAToO) ; INLINE (iif(lAtoO == NIL, ...

... := TRect():New( 40,; Max( ( nWidth / 2 ) - nMetaWidth, 10 ),; nHeight,; Min( ( nWidth / 2 ) + nMetaWidth, nWidth - 20 ) ) ::oMeta2:Hide() ::oMeta1:SetCoors( oCoors1 ) ::oMeta1:Refresh() endif case ::lTwoPages nFactor := .4 aFiles := ::oDevice:aMeta // DEVICE nWidth := ::oWnd:nWidth() nHeight := ...

... := TRect():New( 40,; Max( ( nWidth / 2 ) - nMetaWidth, 10 ),; nHeight,; Min( ( nWidth / 2 ) + nMetaWidth, nWidth - 20 ) ) oMeta2:Hide() oMeta1:SetCoors( oCoors1 ) oMeta1:Refresh() case lTwoPages nFactor := .4 aFiles := DEVICE:aMeta nWidth := oWnd:nWidth() nHeight := oWnd:nHeight() - 10 - If( ...

... := TRect():New( 40,; Max( ( nWidth / 2 ) - nMetaWidth, 10 ),; nHeight,; Min( ( nWidth / 2 ) + nMetaWidth, nWidth - 20 ) ) oMeta2:Hide() oMeta1:SetCoors( oCoors1 ) oMeta1:Refresh() case lTwoPages nFactor := .4 aFiles := DEVICE:aMeta nWidth := oWnd:nWidth() nHeight := oWnd:nHeight() - 10 - If( ...

Wilson, Son coordenadas "simuladas" tipo MsDos. Si revisas los fuentes de la clase TButton verás esto: SetCoors( ::hWnd, nRow * 10, nCol * 10 ) Luego estamos multiplicando los valores que usas por 10. Se podría cambiar esa constante (10), ó añadir la claúsula PIXEL. Tambien ...

... de la clase TFolder, ahora se liberan todos los diálogos usados (manejados). * Mejora: En FWH, el método Paint() de la clase TmetaFile, llama a ::SetCoors() si ::nVRatio no está definido. * Mejora: En FWH, el método AddItem( cItem, cResName, bRedefineControls ) de la clase TFolder, ahora usa un ...