Ok
dann mal ein Programmbeispiel
-------------------------------------------------------------------------------------
DEF test( )
DECL INT ANSWER
DECL STATE_T STATE
DECL INT OFFSET
DECL MSG_T EMPTY_MSG
EMPTY_MSG={MSG_T: VALID FALSE,RELEASE FALSE,TYP #NOTIFY,MODUL[] " ",KEY[] " ",PARAM_TYP #VALUE,PARAM[] " ",DLG_FORMAT[] " ",ANSWER 0}
$MSG_T.Release=FALSE
$MSG_T=EMPTY_MSG
$MSG_T.MODUL[]="TEST"
$MSG_T.KEY[]="Meine Meldung"
$MSG_T.TYP=#NOTIFY
$MSG_T.VALID=TRUE
WHILE $MSG_T.VALID
WAIT SEC 0.1
ENDWHILE
WAIT SEC 0.1
$MSG_T=EMPTY_MSG
WAIT SEC 0.3
;*****************************************************
;Liefert die Meldung: Meine Meldung
$MSG_T.Release=FALSE
$MSG_T=EMPTY_MSG
$MSG_T.MODUL[]="ESCDiag"
$MSG_T.KEY[]="ESCAllwaysTop"
$MSG_T.TYP=#NOTIFY
$MSG_T.VALID=TRUE
WHILE $MSG_T.VALID
WAIT SEC 0.1
ENDWHILE
WAIT SEC 0.1
$MSG_T=EMPTY_MSG
WAIT SEC 0.3
;*****************************************************
;Liefert die Meldung: Immer im Vordergrund
END
------------------------------------------------------------------------------------
Im 2 Teil wird auf die Datenbank ESCDiag.mdb verwiesen bzw. zugegriffen
und jetzt will ich das gleiche mit der Kuka_con.mdb machen und zwar so
$MSG_T.Release=FALSE
$MSG_T=EMPTY_MSG
$MSG_T.MODUL[]="IO"
$MSG_T.KEY[]="IN_1"
$MSG_T.TYP=#NOTIFY
$MSG_T.VALID=TRUE
WHILE $MSG_T.VALID
WAIT SEC 0.1
ENDWHILE
WAIT SEC 0.1
$MSG_T=EMPTY_MSG
WAIT SEC 0.3
dann sollte der gespeicherte Langtext als Meldung erscheinen und nicht
wie bei mir "IN_1"
ich hoffe das war jetzt verständlicher schön wäre es jetzt noch den Text in einer Variablen zu speichern muss aber für meinen Zweck nicht sein wenn das obrige Funktioniert bin ich schon glücklich
Gruss Andy