FiveTech Software tech support forums

... manipulate a string. I am sending an HL7 result message that contains a comment section. In this comment section I am inserting my comment (var = cComment) cComment can contain a paragraph or more. The issue I'm having is, if the user enters their comment as one long string (ie: no CRLFs) the ...

... HB_SetTermCP(<cTermCP>,[<lBoxChar>])->Nil HB_SetWith([<oNewObject>])->oOldObject HB_SetZIPComment(<cComment>)->Nil HB_Shadow(<nTop>,<nLeft>,<nBottom>,<nRight>,[<nColorAttr>])->Nil HB_SizeOfCStructure(<aTypes>,[<nAlign>])->nBytes ...

... $DOC$ * $FUNCNAME$ * HB_SETZIPCOMMENT() * $CATEGORY$ * Zip Functions * $ONELINER$ * Set an Zip archive Comment * $SYNTAX$ * HB_SETZIPCOMMENT( <cComment> ) --> Nil * $ARGUMENTS$ * <cComment> Comment to add to the zip archive * $RETURNS$ * <NIL> this function always return NIL ...

James, I have compiled a program with this function: DLL32 Function PhoneTo1( cPhoneNo As LPSTR, cAppName AS LPSTR, cName AS LPSTR, cComment AS LPSTR ) ; AS LONG PASCAL FROM "tapiRequestMakeCall" LIB "TAPI32.DLL" It's work fine but at least two dialog appears on the screen for each calls. ...

... phone calls and send sms through skype. Function Countrycode() not included. Hope you'll enjoy it. :lol: Antonio FUNCTION PhoneTO(cPhone,cNome,cComment,CodeCountry) Local oSkype,oCall,oUser DEFAULT CodeCountry := CountryCode() if empty(cPhone) return 0 endif //if its a user do nothing if val(cPhone) ...

Dear AHF,

Try

oCall := oSkype:SendSms(cPhone, cComment)

Code: Select all  Expand view

oCall := oSkype:PlaceCall(cphone)

Regards,
Dutch

I've been trying with the code below but it doesn't work. FUNCTION PhoneTO(cPhone,cNome,cComment) Local oSkype,oCall,oUser cPhone := alltrim(cPhone) Try oSkype := CreateObject("Skype4COM.Skype") Catch alert("Skype4Com não está instalado!") return End If .not. oSkype:Client:IsRunning() ...

... del objecto database a otro? Salu2. Tdbf es similar a TDataBase pero más potente. En Tdbf se haría: oTDbfexDomi := oTDbfDomici:Clone( lNewArea, cComment ) y para copiar los valores de los campos: For nContador := 1 To Len( oTDbfDomici:aTField ) AEVAL( oTDbfexDomi:aTField, { |oCampo| If( oCampo:cName ...

... (sin optimizar) que utilizo con FWH 7.01 y parece que funciona correctamente: Saludos ****************************** METHOD Clone( lNewArea, cComment ) CLASS TDbf local oDb := Self local oClon DEFAULT lNewArea := .f. DEFAULT cComment := ::cComment if lNewArea oClon := DbfServer( oDb:cFile ...

... $DOC$ * $FUNCNAME$ * HB_SETZIPCOMMENT() * $CATEGORY$ * Zip Functions * $ONELINER$ * Set an Zip archive Comment * $SYNTAX$ * HB_SETZIPCOMMENT( <cComment> ) --> Nil * $ARGUMENTS$ * <cComment> Comment to add to the zip archive * $RETURNS$ * <NIL> this function always return NIL ...

... $DOC$ * $FUNCNAME$ * HB_SETZIPCOMMENT() * $CATEGORY$ * Zip Functions * $ONELINER$ * Set an Zip archive Comment * $SYNTAX$ * HB_SETZIPCOMMENT( <cComment> ) --> Nil * $ARGUMENTS$ * <cComment> Comment to add to the zip archive * $RETURNS$ * <NIL> this function always return NIL ...

... $DOC$ * $FUNCNAME$ * HB_SETZIPCOMMENT() * $CATEGORY$ * Zip Functions * $ONELINER$ * Set an Zip archive Comment * $SYNTAX$ * HB_SETZIPCOMMENT( <cComment> ) --> Nil * $ARGUMENTS$ * <cComment> Comment to add to the zip archive * $RETURNS$ * <NIL> this function always return NIL ...