PC Toledo

Tente assim ou veja no manual próprio.

// Exemplo conceitual para impressão direta
cComandos := "SIZE 100 mm, 150 mm" + CRLF + ;
"CLS" + CRLF + ;
"TEXT 10,10,""3"",0,1,1,""Exemplo Knup""" + CRLF + ;
"PRINT 1" + CRLF
nHandle := fcreate("LPT1") // Ou a porta USB mapeada
fwrite(nHandle ...

Lucimauro, desculpe minha ignorância, mas o que é: GtQtc? É FOR DOS ou FOR WINDOWS? Onde baixa? Qual compilador se usa? Tens exemplos práticos e telas, para mostrar? Somente curiosidade, ok?

Obg. abs.

Regards, saludos.

tela cheia:

https://www.linguagemclipper.com.br/blo ... e-xharbour

Regards, saludos.

Veja se ajuda:

O problema de caixas (boxes/molduras) e caracteres especiais (acentuação, linhas gráficas) não aparecerem corretamente em aplicações xHarbour no Windows 11 geralmente é causado por incompatibilidade de Code Page (codificação de caracteres) entre o console do Windows e a aplicação ...

https://www.fivetechsoft.com/forums/vie ... hp?t=37397

https://www.fivetechsupport.com/forums/ ... 47#p234147

https://fivewin.com.br/index.php?/topic ... arupdfprg/

Regards, saludos.

Dia Quintas, este código que você postou, é para controlar a rotina em FIVEWIN, ou para a outra biblioteca W.. não sei o que?

Seria interessante você postar a ROTINA QUE CONGELA(em FIVEWIN), ela está redonda mesmo?

Regards, saludos.

Fernando,

O ACBr não possui um componente nativo "ACBrWhatsApp" oficial no pacote principal, mas usuários da comunidade frequentemente utilizam integrações API/REST ou bibliotecas de terceiros como o WPP4Delphi e TInject para conectar o Delphi/Lazarus ao WhatsApp, enviando texto e anexos.

Mantenha ...

Boa tarde, mostre como estais fazendo completo:
Assim?

https://fivewin.com.br/index.php?/topic ... es-de-xml/

Regards, saludos.

// C:\FWH\SAMPLES\CDOSYS2.PRG - Simples MODEL for HARBOUR.

#include "FiveWin.ch"

FUNCTION Main()

...
...
IF ...
...
PW_EnviaEmail( mPwUser, mPwEmail, mPwNome, mPwPass )
...
ENDIF
...
...

RETURN NIL
// Função para chamada do email:
FUNCTION PW_EnviaEmail( cPwUser, cPwEmail, cPwNome ...

Olá, veja se ajuda:

https://forums.fivetechsupport.com/view ... 30#p223530

Regards, saludos.

Algo assim?


#include "fivewin.ch"

FUNCTION Main()

LOCAL oHTTP := HTTPRequest():New()
LOCAL cURL := "http://your-server.com/upload" // Replace with your target URL
LOCAL cBoundary := "----WebKitFormBoundary7MA4YWxkTrZu0gW" // A unique boundary string

// Set the Content-Type header for ...

Judson, sua pergunta deveria ser no tópicos do FiveWin. Veja:

https://fivewin.com.br/index.php?/topic ... -xharbour/

https://fivewin.com.br/index.php?/topic ... ogger-dll/

Regards, saludos.

Tá na mão meu rei:

https://mega.nz/file/0QEiBLwC#JemeDpLMC ... 6-XOz6qElo

Regards, saludos.

Picture Codes

Say Picture Functions
B Display numbers left-justified ¦ X Display DB after negative numbers
C Display CR after positive numbers ¦ Z Display zeros as blanks
D Display date in SET DATE format ¦ ( Enclose negative numbers in parens
E Display date in British format ¦ ! Convert alpha ...

Eu faria como nesta tabela da SUVINIL, criaria o BOTÕES usando BTNBMP ou um XBROWSE com BOTÕES e aplicaria as mesmas cores nos botões com os textos iguais a figura deste LINK:

https://www.suvinil.com.br/cores?gad_source=1&gclid=CjwKCAjw-qi_BhBxEiwAkxvbkMEA1dH9TfZYk_OLCJ9NXnpy8hb8O2uhoWime ...