In fase di esecuzione di EXE non vengono visualizzate le icone.
Mi 猫 stato detto di ricompilare le librerie FWH, cosa che 猫 stata fatta (猫 stata ricompilata la libreria \FWH\LIB\fivehx.lib) ma il problema persiste.
Qualcuno s脿 darmi una mano ed al limite fornirmi le istruzioni ed i file .BAT per ricompilarle.
Grazie, Andrea.
aerrigo wrote:In fase di esecuzione di EXE non vengono visualizzate le icone.
PROCEDURE main()
LOCAL oBar
SET DATE british
SET EPOCH TO 1940
SET DATE FORMAT "dd/mm/yyyy"
SET DELETED on
SET DECIMAL TO 2
DEFINE WINDOW oWnd ;
TITLE "Test" ;
ICON "geoage" ;
MENU Buildmenu()
SET MESSAGE OF oWnd TO "" ;
TIME ;
DATE ;
KEYBOARD
oMsg:=oWnd:oMsgBar
DEFINE BUTTONBAR oBar OF oWnd 3DLOOK ;
SIZE 46,46
DEFINE BUTTON NAME "UTENTI" OF oBar TOOLTIP "Utenti" ;
NOBORDER ;
ACTION Utenti()
DEFINE BUTTON NAME "AZIENDE" OF oBar TOOLTIP "Prova" ;
NOBORDER ;
ACTION nil
DEFINE BUTTON NAME "COMUNI" OF oBar TOOLTIP "Prova2" ;
NOBORDER ;
ACTION nil
DEFINE BUTTON NAME "ANAZIE" OF oBar TOOLTIP "Prova3" ;
NOBORDER ;
ACTION nil
DEFINE BUTTON NAME "uscita" OF oBar TOOLTIP "Termina il programma" ;
NOBORDER ;
GROUP ;
ACTION oWnd:End()
ACTIVATE WINDOW oWnd MAXIMIZED VALID If( MsgYesNo( "Sei sicuro di voler chiudere Test ?","Avvertenza"), .T., .F. ) ;
ON PAINT ( FillBlue( oWnd ), Sfondo( hDc, oWnd ) )
RETURN
----EOF MAIN.PRG
Il problema 猫 che il codice sopra riportato punta ad un .RES esterno e compilato su un PC, le icone si vedono, su un'altra macchina quando si clicca sull'icona Utenti viene restituito il seguente errore :
Path and name: G:\FWH\XXXX\p.exe (32 bits)
Size: 1,510,400 bytes
Time from start: 0 hours 0 mins 2 secs
Error occurred at: 31/10/2006, 12:36:37
Error description: Error FiveWin/3 Cannot create Dialog Box:
每每每每每每每每每每每每每每每每每每每每每每Resource: UTENTI
Called from CREATEDLGERROR(0)
Called from TDIALOG:ACTIVATE(0)
Called from UTENTI(50)
Called from (b)MAIN(38)
Called from TBTNBMP:CLICK(0)
Called from TBTNBMP:LBUTTONUP(0)
Called from TWINDOW:HANDLEEVENT(0)
Called from TBTNBMP:HANDLEEVENT(0)
Called from _FWH(0)
Called from WINRUN(0)
Called from TWINDOW:ACTIVATE(0)
Called from MAIN(61)
Il programma UTENTI.PRG 猫 indicato di seguito :
Function Utenti()
LOCAL oDlg,oLbx
LOCAL cLbx,nRec,lCanc
USE UTENTI NEW
INDEX ON UTENTI->UTE_DES TO UTENTI
DEFINE DIALOG oDlg RESOURCE "UTENTI" TITLE "Utenti"
oDlg:lHelpIcon := .f.
lCanc := .F.
nRec := Lastrec()
REDEFINE LISTBOX oLbx var cLbx ;
FIELDS UTENTI->UTE_COD,UTENTI->UTE_DES,UTENTI->UTE_PWD,UTENTI->UTE_AZI ;
HEADERS "UTE_COD", "UTE_DES","UTE_PWD","UTE_AZI" ;
FIELDSIZES 80, 150,100,10 ;
ID 101 OF oDlg
oLbx:aJustify = { .f., .f.,.f.,.f.}
oLbx:lFocused := .T.
REDEFINE BUTTON ID 201 OF oDlg ;
ACTION NuovoUtente(oLbx)
REDEFINE BUTTON ID 202 OF oDlg ;
ACTION SchedaUtenti(oLbx)
REDEFINE BUTTON ID 203 OF oDlg ;
ACTION CercaUtent( oLbx )
REDEFINE BUTTON ID 204 OF oDlg ;
WHEN nRec > 0 ;
ACTION ( If( MsgYesNo("Elimino l'utente in evidenza?", "Avvertenza!"), ;
( UTENTI->( Elimina(oLbx) ), ;
lCanc:=.T.), ;
oLbx:SetFocus() ))
REDEFINE BUTTON ID 205 OF oDlg ;
ACTION oDlg:End()
ACTIVATE DIALOG oDlg CENTER
CLOSE UTENTI
Return Nil
Function SchedaUtenti(oLbx)
Ciao, Andrea.
aerrigo wrote:Il problema 猫 che il codice sopra riportato punta ad un .RES esterno
EnricoMaria wrote:aerrigo wrote:Il problema 猫 che il codice sopra riportato punta ad un .RES esterno
Un .RES non pu貌 essere esterno, deve per forza essere inglobato nell'EXE. Solo una DLL pu貌 essere esterna. Controlla che nell'EXE ci siano le risorse aprendolo con il Resource Workshop o altro editor di risorse.
EMG
La versione di Windows non fa alcuna differenza. Devi controllare il batch di compilazione e in particolare il punto in cui il linker inserisce le risorse nell'EXE.
EMG
EnricoMaria wrote:La versione di Windows non fa alcuna differenza. Devi controllare il batch di compilazione e in particolare il punto in cui il linker inserisce le risorse nell'EXE.
EMG
La sintassi non mi sembra corretta (non ci vuole il punto e virgola dopo il percorso delle librerie e tra la lista delle librerie e il RES c'猫 il parametro opzionale deffile) per貌 se dici che sull'altro PC funziona...
Magari prova a portare tutto (ma proprio tutto) l'ambiente da un PC all'altro e vedi se funziona.
Altro non mi viene in mente.
EMG
EnricoMaria wrote:La sintassi non mi sembra corretta (non ci vuole il punto e virgola dopo il percorso delle librerie e tra la lista delle librerie e il RES c'猫 il parametro opzionale deffile) per貌 se dici che sull'altro PC funziona...
Magari prova a portare tutto (ma proprio tutto) l'ambiente da un PC all'altro e vedi se funziona.
Altro non mi viene in mente.
EMG
ILINK32 [@respfile][options] startup myobjs, [exe], [mapfile], [libraries], [deffile], [resfile]
EnricoMaria wrote:deffile. Dalla documentazione:
ILINK32 [@respfile][options] startup myobjs, [exe], [mapfile], [libraries], [deffile], [resfile]
EMG
S矛, certo. E' appunto da quella che ho tratto la sintassi che ti ho citato. La puoi scaricare dal sito della Borland. Oppure mi scrivi in privato e te la mando io.
EMG
Caro Enrico,
volevo ringraziarti, ho risolto il problema.
Sinceramente non ho ancora capito come perch猫 ho fatto tante prove.
Appena ne vengo a capo lo pubblico, cos矛 se qualcuno ne ha bisogno potr脿 trovarlo qui.
Grazie ancora, Andrea.
Benissimo!
EMG
EnricoMaria wrote:Benissimo!
EMG