Search found 23 matches: ofnt1

Return to advanced search

al Cargar cToolTip es muy leno

... := AllTrim(Str( nSit )) oBtns[nSit]:cargo := nSit oBtns[nSit]:bLostFocus := {|oBtn| oBtn:lPressed := .t.} oBtns[nSit]:oFont := oFnt1 oBtns[nSit]:cToolTip := verasiento(nSit,CodViaje,CodControl) Next STATIC function verasiento(nSit,CodViaje,CodControl) *-------------------------- ...
by jbrita
Wed Apr 06, 2022 1:54 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: al Cargar cToolTip es muy leno
Replies: 2
Views: 242

Error 1064 xBrowse MySQL

... == Nil Return(Nil) EndIf ... ... // xbrowse @ 4.3,00 xBrowse oPesBrw Of oPesWnd ; DataSource oPes ; On DblClick(lNew:=.f.,PessoaIncluir()) ; Font oFnt1 NoBorder Cell ; UpDate AutoSort ... https://uploaddeimagens.com.br/imagens/error-mysql-jpg ... Após navegar entre os registros e tentar ...
by ip_ram
Wed Aug 08, 2018 12:06 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Error 1064 xBrowse MySQL
Replies: 8
Views: 1281

Re: Shapes Excel

este es el codigo: STAT FUNC ExportarTodos() *----------------------------- LOCAL oGraph1, oBar,oDlg,oFnt1,oFnt2 LOCAL oGraph2,oShape LOCAL aVenta:={} LOCAL nTotReg:=0 LOCAL ntotal:=0 Local ntotVenta:=0 Local nMes,ndia LOCAL aGets := Array( 30 ) Local I Local nValor:=0 Local ...
by jbrita
Thu Jan 26, 2017 2:00 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Shapes Excel
Replies: 7
Views: 1633

Re: Problema con la MsgBar

... ¿Qué está mal de esa carga y descarga de bitmaps desde recursos? DEFINE DIALOG oDlgarbol RESOURCE "ARBOLGRUPOS" FONT px:oDomiFont //oFnt1 REDEFINE BITMAP oBmp1 ID 109 OF oDlgarbol RESOURCE 1809 TRANSPARENT REDEFINE BITMAP oBmp2 ID 111 OF oDlgarbol RESOURCE 1807 TRANSPARENT REDEFINE ...
by jmartial
Fri Sep 19, 2014 10:26 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Problema con la MsgBar
Replies: 6
Views: 847

Re: Ayuda -imprimir factura con columna texto tipo memo

... su lugar de trabajo. Ni se permitirá el porte de armas " +; "blancas ni de ninguna otra especie. " Imp_Memo(cTxt,oPrn,16.6,2.0,18.0,oFnt1,0.4,) FUNCTION Imp_Memo(cTxt,oPrn,nRow,nCol,nWid,oFont,nSkp,nClr) LOCAL cLin, lCont:=.T., nP:=0, lNext, cC, nW DEFAULT nSkp:=0.4, nClr:=0 cTxt:=Alltrim(cTxt) ...
by jbrita
Tue Apr 22, 2014 3:25 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Ayuda -imprimir factura con columna texto tipo memo
Replies: 19
Views: 4633

Re: xHarbour: no line numbers on compile errors

... Error E0030 Syntax error: "parse error at 'ACTION '" .\SOURCE32\TOfferMsf.prg(433) Warning W0001 Ambiguous reference: 'OFNT1' 1 error No code generated ** error 1 ** deleting .\OBJ32\TOfferMsf.c
by richard-service
Wed Oct 09, 2013 3:48 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: xHarbour: no line numbers on compile errors
Replies: 19
Views: 3261

Usar GTK con FiveLinux

... hacer? ¿Qué estaré haciendo mal? Se agradece cualquier ayuda. DEFINE WINDOW oWnd_Principal TITLE hb_strtoutf8(cTitulo) SIZE 1024, 690 DEFINE FONT oFnt1 NAME "helvetica bold italic 130" @ 36, 9 SAY oCaja PROMPT "CAJA "+alltrim(str(ncajax,2,0)) OF oWnd_Principal SIZE 800, 230 ...
by jgayoso
Thu Dec 29, 2011 2:22 pm
 
Forum: FiveLinux / FiveDroid (Android)
Topic: Usar GTK con FiveLinux
Replies: 3
Views: 1476

Re: PROBLEMAS CON LA TDOSPRN

... *-------------------- Local cPuerto:="LPT1" Local oPrn,fila,copia,pagina,I,linea,nRow,oPen1,oFnt1,oFnt2,oFnt3,oFnt4,oFnt5 Local nTotVenta:=0 Local nLargo:=Len(aDatos) oPrn:=TDosPrn():New(cPuerto) oPrn:command( "27","67", ...
by jbrita
Tue Nov 24, 2009 11:34 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: PROBLEMAS CON LA TDOSPRN
Replies: 14
Views: 2608

Yo lo genero desde una plantilla txt sin necesidad de word

... oDlg Return Nil ****************************************************************** Static Function aImpresora(cTexto, lChkBox, nCopias) local oFnt1, oFnt2, oFnt3, oFnt4, oFnt5 local nlinea:=75, nAncho:=2600 local nSeparacion:=19, nSaltoLinea:=60 local nColumna:=1000 local nCentro:=1400 local ...
by tosko
Tue Dec 02, 2008 3:20 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Imprimir en base a una plantilla/doc. externo
Replies: 3
Views: 1256

PRINT oPrn NAME "Impresion de embarques" PREVIEW
oPrn:SetPage(1) //carta
oPrn:SetPortrait()
// oPrn:SetLandscape()

oPrn:setup()

DEFINE FONT oFnt1 NAME "THAHOMA" SIZE 0, -08 OF oPrn bold
page
oPrn:cmsay(1,1, "texto", oFnt1 )
endpage
endprint
by sysctrl2
Tue Jun 24, 2008 8:08 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: ¿Como forzar que la impresión sea en página vertical?
Replies: 8
Views: 1276

... fonts per column: oCol:bFntRowData := { || f_fntRowData() } STATIC FUNCTION f_fntRowData() LOCAL oFntRow:="" IF (ordkeyno()) % 2 == 0 oFntRow := oFnt1 elseif … ELSE oFntRow := oFnt2 ENDIF RETURN (oFntRow)
by Otto
Mon Dec 17, 2007 12:28 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: XBrowse – show lines slashed
Replies: 19
Views: 4465

Re: Clase tAnimate

... No me genera error pero tampoco la visualizo. Mi PRG es: define dialog vera2 resource 'CONTROL' REDEFINE SAY on prompt 'AGE' id 201 of vera2 font ofnt1 REDEFINE BITMAP inten id 108 of vera2 resource 'keys' transparent redefine say otexto prompt texto id 300 of vera2 oAnimate = TAnimate():Redefine( ...
by Loren
Thu Nov 29, 2007 6:04 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Clase tAnimate
Replies: 4
Views: 1156

... a mi me funciono con el papel Full Width 72mm * Receipt y en la tprinter no necesite poner nada adicional. print oPrn page oPrn:cmsay( 1,1,cVar, oFnt1 ) endpage endprint Dejad que Microsoft controle todo jajaj, desgraciadamente es poco profesional la solucion pero solucion al fin,, Saludos cordiales..
by sysctrl2
Fri Jul 20, 2007 4:39 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: tPrinter urgente
Replies: 9
Views: 4139

PrnSetSize() no funciona

... 8cm x 14cm PRINT oPrn TITLE cTitulo TO alltrim( (cImpresor)->printer1 ) oPrn:SetSize( 800, 1400 ) //no funciona PAGE oPrn:cmsay(1,1, 'TEXTO' , oFnt1 ) ENDPAGE ENDPRINT No respeta las medidas que se especifica en la funcion SetSize ni antes de la definicion del objeto ni despues,, saludos...
by sysctrl2
Wed Jul 18, 2007 7:28 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: tPrinter urgente
Replies: 9
Views: 4139

... manda llamar esta funcion. y veras que el sistema se sale sin de decir nada. static function _cuadricula() local nFor local nCol Local oPrn local oFnt1 PRINT oPrn TITLE 'Cuadricula' PREVIEW DEFINE FONT oFnt1 NAME "TAHOMA" SIZE 0,-08 OF oPrn bold oPrn:lPrvModal := .t. page for nFor := 1 to 26 oPrn:cmsay( ...
by sysctrl2
Mon Jun 25, 2007 7:15 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: salida abrupta...
Replies: 5
Views: 983
Next

Return to advanced search