L'esempio è mio ma non è corretto. Eccoti la versione attuale. STATIC FUNCTION GETMAIL( cServer, cUser, cPassword ) LOCAL lOk := .F. LOCAL oCli LOCAL aMail, aPar, cMsg, oAtt LOCAL ...
Eccoti un esempio funzionante: #include "Fivewin.ch" #define EM_LIMITTEXT 197 FUNCTION MAIN() LOCAL oDlg LOCAL oGet, cVar := SPACE( 80 ) DEFINE DIALOG oDlg @ 1, 1 GET oGet VAR cVar MEMO; SIZE ...
Eccoti un esempio funzionante: FUNCTION MAIN() LOCAL oWord, oDoc, oSel oWord = CREATEOBJECT( "Word.Application" ) oDoc = oWord:Documents:Add() oDoc:Paragraphs:TabStops:Add( ...
Eccoti un esempio funzionante. Spero di aver capito bene cosa ti serviva: #include "Fivewin.ch" FUNCTION MAIN() LOCAL oWnd LOCAL aBtn := {} LOCAL n := 1 LOCAL i, j DEFINE WINDOW oWnd ...
Eccoti un esempio funzionante: #include "Fivewin.ch" FUNCTION MAIN() LOCAL oDlg, oFnt, oRad, nRad LOCAL i DEFINE FONT oFnt NAME "Arial" SIZE 0, -20 DEFINE DIALOG oDlg @ 1, 1 RADIO oRad VAR nRad; ...
Ma credo di aver capito il tuo problema. Probabilmente dimenticavi di aggiungere lo spostamento dell'immagine rispetto alla dialog. Eccoti un altro esempio modificato rispetto al precedente: #include "Fivewin.ch" #define BRUSH_NULL 5 FUNCTION MAIN() LOCAL oDlg, oImg ...
... con il mouse o freccie sulla relativa cella ma se clicco con tasto destro su un'altra cella: come faccio per sapere su che riga/colonna sono ? Eccoti il solito esempio, ancora modificato. E speriamo che stavolta tu lo prenda in considerazione: #include "Fivewin.ch" #include "Tcbrowse.ch" ...
Eccoti un esempio funzionante: #define wdPrintView 3 FUNCTION MAIN() LOCAL oWord oWord = CreateObject( "Word.Application" ) oWord:Documents:Add() oWord:ActiveDocument:ActiveWindow:View:Type ...
... obbligo. Se si trova difficoltà ad organizzarsi lo strumento da soli allora c'è la possibilità di avere tutto già pronto per l'uso. Ad ogni modo, eccoti un batch di compilazione per un singolo PRG (controlla i percorsi): @ ECHO OFF SET HARBOURCMD=/a /es2 /gc0 /m /n /q /w2 SET INCLUDE=c:\xharbour\include;c:\bcc55\include ...
Eccoti un esempio funzionante. Spero di aver capito bene ciò che ti serve. Ti ho messo due possibilità, una con un pulsante e una digitando direttamente: #include "Fivewin.ch" FUNCTION MAIN() LOCAL oDlg ...