Search found 19 matches: cmodelo

Return to advanced search

FWH1507 estranho comportamento

... share image prg: @ ((nLinha+.01) * 70) - 62, nColuna btnbmp m->MoBtn[n] of m->oWndc prompt cDescricao resource cModelo top size 60, 64 ; action ( nMesa := RetornaObj( m->oWndc, m->MoBtn ), ChamaMesa( cModulo, nMesa ) ) ; pixel message m->cDescMesasF2 ...
by MGA
Fri Sep 11, 2015 1:14 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: FWH1507 estranho comportamento
Replies: 3
Views: 491

Re: Conseguir la maxima velocidad del EXE creado por Harbour

... de recorrer un array que además su contenido son objetos de una clase ¿ sería esta ?: for each x in aArray WITH OBJECT x :cMatricula :cMarca :cModelo :nPrecio END next x Es sobre este ejemplo de código: function main()public aArray := {=>} , x aArray [ "M-1234-DF" ...
by JmGarcia
Sun Mar 18, 2012 2:23 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Conseguir la maxima velocidad del EXE creado por Harbour
Replies: 29
Views: 10549

Posicion del Combobox con REDEFIN *** Solucionado ***

... si el elemento seleccionado del primer combo cambiara automaticamente el de los siguientes. Estan bajo la clausula REDEFINE COMBOBOX oCombo VAR cModelos ITEMS aModelos ID 170 OF oDTipoV UPDATE Los combobox los vacio con oCombo:SetItems( {} ) y procedo a rellenarlos con oCombo:ADD( cModelo ) ...
by Blessed
Mon Jun 09, 2008 5:56 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Posicion del Combobox con REDEFIN *** Solucionado ***
Replies: 6
Views: 1292

... DOLL 5505 BABY 5670 BABU DOLL Ahora bien, como tu sabes la función ORDSCOPE() trabaja sobre el índice así que si metemos el siguiente código: (cModelo)->(ORDSCOPE(0,"5500 ")) (cModelo)->(ORDSCOPE(1,"5505 ")) (cModelo)->(DBGOTOP()) Nos esta limitando la vista a solo los tres modelos ...
by Armando
Mon Sep 03, 2007 10:25 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: ayuda filtros y mas filtros ...
Replies: 3
Views: 929

Re: Duda Twordhb

... uno formulario word, utilizo uno dbf temporario con mergefild en los campos do word, ao invocar utilizo: oWord := TWord():New() oWord:OpenDoc( cModelo ) oWord:OpenDataSource( cArquivo ) oWord:oMailMerge:Invoke( "Execute" ) oWord:Visualizar() Me abre 2 arquivos RECIBO.DOT e otro com los dados ...
by Wanderson
Wed Aug 08, 2007 8:50 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Duda Twordhb
Replies: 2
Views: 890

Re: Duda Twordhb

... uno formulario word, utilizo uno dbf temporario con mergefild en los campos do word, ao invocar utilizo: oWord := TWord():New() oWord:OpenDoc( cModelo ) oWord:OpenDataSource( cArquivo ) oWord:oMailMerge:Invoke( "Execute" ) oWord:Visualizar() Me abre 2 arquivos RECIBO.DOT e otro com los dados ...
by Vikthor
Wed Aug 08, 2007 8:39 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Duda Twordhb
Replies: 2
Views: 890

Duda Twordhb

... uno formulario word, utilizo uno dbf temporario con mergefild en los campos do word, ao invocar utilizo: oWord := TWord():New() oWord:OpenDoc( cModelo ) oWord:OpenDataSource( cArquivo ) oWord:oMailMerge:Invoke( "Execute" ) oWord:Visualizar() Me abre 2 arquivos RECIBO.DOT e otro com los dados ...
by Wanderson
Wed Aug 08, 2007 6:35 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Duda Twordhb
Replies: 2
Views: 890

Problemas con Tword y Campos Memo

... campos memos me marca error al querer abrir la base. Alguien esta utilizando Tword y campos memos. STAT FUNC Imp_Carta(vCar) local cArchivo local cModelo, oWord, nCarta oDTab:=Open_Dbf("BONOCAR" ) IF (oDTab)->(DbSeek(vCar)) nCarta :=ALLTRIM((oDTab)->nCarta) EndIf Close_Dbf("BONOCAR",oDTab) ...
by maecmx
Tue Jun 26, 2007 7:02 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Problemas con Tword y Campos Memo
Replies: 0
Views: 557

Pon así Try oWord := TWord():New() // inicia o objeto OLE Word if oWord:IsVisible() oWord:Hide() endif oWord:OpenDoc( cModelo ) // abre o documento modelo for x=1 to len( aCampos ) oWord:Replace( '['+aCampos[x,1]+']' , aCampos[x,2] ) next oWord:Save(CAMIFO) oWord:visualizar() Catch ...
by horacio
Thu Jun 14, 2007 8:09 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: TWORD, evitando possiveis erros na abertura !
Replies: 2
Views: 986

TWORD, evitando possiveis erros na abertura !

... static function fiancaWord(aCampos,camifo) ************************************************* local x, cModelo:=CurDrive()+':\'+Curdir()+'\fiançamo.dot' private oWord oWord := TWord():New() // inicia o objeto OLE Word if oWord:IsVisible() oWord:Hide() ...
by AOKISANTOS
Thu Jun 14, 2007 6:22 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: TWORD, evitando possiveis erros na abertura !
Replies: 2
Views: 986

pergunta sobre Tword

... do arquivo aberto ? private hWord hWord :=TWord():New() // inicia o objeto OLE Word if hWord:IsVisible() hWord:Hide() endif hWord:OpenDoc( cModelo ) // abre o documento modelo for x:=1 to len( aCampos ) hWord:Replace( '['+aCampos[x,1]+']' , aCampos[x,2] ) next hWord:Save(CAMIFO) hWord:visualizar() ...
by AOKISANTOS
Thu May 31, 2007 5:41 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: pergunta sobre Tword
Replies: 0
Views: 543

¡¡ AYUDA COMO IMPRIMIR EN IMPRESORA POR COM !!!

... RETURN //*************************************************** FUNCTION ABRE_PORT(nPORT,nVELOC,nDADOS,nPARIDADE,nPARADA,nIRQ,cBUFFER,cMODELO) LOCAL lOK //IRQ4:=4 lOK:=INIT_PORT(nPORT,nVELOC,nDADOS,nPARIDADE,nPARADA,nIRQ,@cBUFFER) ?"lok",lok wait "lok" SETRTS(.T.) //Habilita RTS se ...
by prm_pedro
Mon Mar 05, 2007 9:39 pm
 
Forum: FiveWin para CA-Clipper
Topic: ¡¡ AYUDA COMO IMPRIMIR EN IMPRESORA POR COM !!!
Replies: 0
Views: 727

PAPEL DE LA IMPRESORA URGENTE

... tamaño del papel y la impresora y me respeta ambas cosas. Pero con W2000 no. Aqui transcribo parte del codigo If( lPrevista == .t. ) If( !Empty( cModelo ) ) oPrn := PrintBegin('Emisión de facturas', .F., .t., cModelo, .F. ) Else oPrn := PrintBegin('Emisión de facturas', .F., .t.,, .F. ) End oPrn ...
by horacio
Tue Feb 27, 2007 2:30 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: PAPEL DE LA IMPRESORA URGENTE
Replies: 1
Views: 851

No me funciona el Refresh en TXBrowse, me ayudan porfis

... IF nOption = 4 AUTOS->Cobertura :="A" ENDIF AUTOS->Clamarctip:= cClamt AUTOS->Marca := cMarc AUTOS->Tipo := cCtipo AUTOS->Modelo := Cmodelo cAire :=AUTOS->conaire cEqf :=AUTOS->equipfabri cAutero :=AUTOS->AUSTERO cAutomatico :=AUTOS->automatico cSina :=AUTOS->sinaire ...
by AIDA
Fri Feb 02, 2007 4:27 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: No me funciona el Refresh en TXBrowse, me ayudan porfis
Replies: 0
Views: 499

NO FUNCIONA?

... STATIC cOverM STATIC cOverT STATIC cOverS STATIC cOverA STATIC cCompa STATIC cAuto STATIC cCamion STATIC cClamt STATIC cMarc STATIC cCtipo STATIC cmodelo STATIC cAire :=.f. STATIC cEqf :=.f. STATIC cAutero :=.f. STATIC cAutomatico :=.f. STATIC cSina :=.f. STATIC cTipico :=.f. STATIC cStd :=.f. ...
by AIDA
Sat Jan 13, 2007 7:47 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: Como se meter un RC en un EXE
Replies: 5
Views: 1960
Next

Return to advanced search