FiveTech Software tech support forums

Amiguinhos

Desculpe-me

Codigo completo em http://www.shoppmarketing.com/forum/fhfoldan.zip

Amigos Sin autor: ***************************************************************************** ********************** Funciones útiles en Harbour & FWH ******************** ********************** 10ª parte ******************************************** #include "FiveWin.ch" #define TFOL...

Amiguinho Basta corrigir: FUNCTION EXTENSO( PVALOR ) LOCAL TSTR := STRZERO(PVALOR,18,2) LOCAL ACIFRA := {{'Trilhon','Trilhons'},; {'Bilhon' ,'Bilhons'},; {'Milhon' ,'Milhons'},; {'Thousand' ,'Thousand'},; {' ' ,' '},; {'Cent','Cents'}} LOCAL TX LOCAL TEXTENSO := ' ' LOCAL TSUBS := ' ' LOCAL TCENTAVO...

Amiguinho E se fixar o tipo de papel ... oPrn:SetPage(9) // 9 indica formato A4 ... Veja isto: #define DMPAPER_LETTER 1 // Letter 8 1/2 x 11 in #define DMPAPER_LETTERSMALL 2 // Letter Small 8 1/2 x 11 in #define DMPAPER_TABLOID 3 // Tabloid 11 x 17 in #define DMPAPER_LEDGER 4 // Ledger 17 x 11 in #d...

Amiguinho Complementando o exemplo do Amigo Rene, neste exemplo voce poderá ler e gravar dados em planilhas simples. * * ---------------------------------------------------------------- * FUNCTION OLEExcel() LOCAL oWnd, oMenu MENU oMenu MENUITEM "&Probar Excel y DBF" MENU MENUITEM &quo...

Friend You can use .INI files to store variables names end data. MyINI.INI [VARIABLES] cTextValue="This is the text value" nNumberValue=123456 Use this example: // Sample showing how to use INI files with FiveWin #include "FiveWin.ch" //-------------------------------------------...

Amiguinhos

You can see examples and the library at http://www.shoppmarketing.com/blogado/

In the next month i will update.

JLCapel

Colocaste bien, ADO solo intercambia la interface, facilitando-la.

Darteagal

Solo necesito saber la version de tu Harbour/Xharbour.

@braços :?)

Friend

Flash memory is a temporary data store and you can't use for this feature or don't re-format.

Work whit HD Serial in the your clients fixed disk.

Para usar nSerialHD() agregue o parametro.

nSerialHD( "C:" )
nSerialHD( "Z:" )

Mira aqui

www.quark-costos.com en descargas

Amiguito

De una olhada en mi blog en http://www.shoppmarketing.com/blogADO e tambien en http://www.capelblog.com/?p=37 la classe TADORS.

Miras esto: function IMG2MEMO( arquivo ) bak_pont=0 destino := L2Hex(GetTickCount())+".TMP" arqcria := fcreate(destino) arqler := fopen( origem ) fimarq := fseek( arqler, 0, 2 ) for ponteiro = 0 to fimarq step 5000 bak := space( 5000 ) if ponteiro + 5000 > fimarq bak := space( fimarq - pon...

At your criteria.

The solution below use fixed files in one shared pc on a lan.

If you need use internet or intranet you can use stream, TActivex and Media Player and Windows Media Encoder.

The solution is here:

Creating a web cam feed with WME.

See Configure each cam to save a file in a directory with names cam1.avi, cam2.avi, etc... Put this code in your application: oCapture:SetFile("directory\cam1.avi"); oCapture:StartCapture() oCapture1:SetFile("directory\cam2.avi"); oCapture1:StartCapture() oCapture2:SetFile("...

Amigo

Revisas el ejemplo TESTTREE.PRG en SAMPLES, ok?