comunication with vc++

  • sorry Hermann, please show me how to use all the code that you sent to me, I have just begin with Delphi. After I open these file what could I continue and how to run them

  • Schritt für Schritt zum Roboterprofi!
  • Hello again (may be the last time in this thread).


    If you are a beginner in BC++ and Delphi just try to get informations in some Borland-Boards (there are hundreds of them in the net).


    Try to find out how to create and compile a new Program and how to use new components. I think this is not the scope of this board, and it's too much what you expect from me.
    I won't explain You how to use Delphi or BC++.


    I think I have already given away enough of my know how about 3964R-protocol. Now it's up to You to make the rest.


    Hermann

  • Sorry Hermann, As you known now I don't have enough time to study detail Delphi, therefore, I must ask you so much, but I think if you have all source of this program please give me. I tried to compile them but it always notice that :"The system can not find the file specificed: haupt. dfm. " .

  • Dear Mr LindePaul,
    I have to used a program SER_SIM.EXE that you sent to me and test run with the robot program, however during I take a test the errror had occurred : No DLE response. Could you please explain to me what is wrong and the meaning of this error? And how to troubleshoot this error? . This error is usually occurr when I send the second data. Please see robot program as below:


    DEFFCT INT GETPOSX(); Sub function to call POSX (X position)


    INT HANDLE
    INT OFFSET
    REAL TIMEOUT
    INT POSX
    DECL STATE_T SR_T,SW_T,SC_T
    DECL MODUS_T MR_T
    CHANNEL :SER_1 :SER_1 $PSER1
    ;
    DECL STATE_T STATE
    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}
    ;$PRO_MODE=#GO
    ;
    ;
    MR_T=#ABS
    TIMEOUT=10
    OFFSET=0
    HANDLE=0


    COPEN(:SER_1,HANDLE)


    IF (HANDLE==0) THEN
    HALT
    ENDIF
    ;
    POSX=0
    CREAD(HANDLE,SR_T,MR_T,TIMEOUT,OFFSET,"%d",POSX)


    $MSG_T=EMPTY_MSG
    $MSG_T.MODUL[]=" "
    $MSG_T.KEY[]="V_SERVO: STEP CODE RECEIVED FOR X = %1"
    OFFSET=0
    SWRITE($MSG_T.PARAM[],STATE,OFFSET,"%d",POSX)
    $MSG_T.PARAM_TYP=#VALUE
    $MSG_T.VALID=TRUE


    IF (SR_T.RET1<>#DATA_END) THEN
    HALT
    ENDIF
    CCLOSE(HANDLE,SC_T)
    RETURN (POSX)
    ENDFCT
    ;------------------------------


    In my project, I use the vision system program is written by VC++, so if I want to send data (detail the coordinate of point x,y,z,A,B,C) form my program please show me how to use your program SER_SIM.EXE with my program.

  • Hi,


    "No DLE response" means the receiver channel is closed.
    Do you know the protocol 3964R ?


    The first transmission (from ser_sim on PC to KRC1) was ok?


    You are reading only on telegram then you close the channel.
    Why, if you expect more datas.


    - make your COPEN anywhere in the main program
    - never use CCLOSE
    - remove "CHANNEL :SER_1 :SER_1 $PSER1"
    - TIMEOUT=10.0 ;real!
    - after fire up the message "$MSG_T.VALID=TRUE", i'm missing the while loop with a small
    wait!
    - send all coordinates in one telegram (e.g. 12 -34 56 78 -910 1112)

    Wer nach allen Seiten offen ist kann nicht ganz dicht sein

Erstelle ein Benutzerkonto oder melde dich an um zu kommentieren

Du musst ein Benutzerkonto haben um einen Kommentar hinterlassen zu können

Benutzerkonto erstellen
Neues Benutzerkonto für unsere Community erstellen. Geht einfach!
Neues Benutzerkonto erstellen
Anmelden
Du hast bereits ein Benutzerkonto? Melde dich hier an.
Jetzt anmelden