PureBoard

Code: Alles auswählen

//Variablen
int ComNr=2; //Schnittstelle COM2
long BaudRate=115200; //Baudrate 115200
BYTE PGMPIAdresse=0; //Adresse der DLL-Aplikation = 0
BYTE HoechsteMPI=31; //Höchste erlaubte Adresse im Netz = 31
bool SchnittstelleWarSchonAllokiert=false; //true wenn die
//Schnittselle schon
//genutzt wird
WORD Error=0; //Error-Variable
char ErrorString[255];//Error-String zum Anzeigen des Fehlers
int MPIHandle=-1; //Handle der neuen Kommunikationsinstanz
//Verbindung aufbauen
if (!MPI6_OpenRS232(&MPIHandle, ComNr, BaudRate, PGMPIAdresse,
HoechsteMPI,
&SchnittstelleWarSchonAllokiert,
&Error)){
//Fehler anzeigen
MPI_A_GetDLLError(MPIHandle, ErrorString, Error);
MessageBox(AppHandle, ErrorString, "", MB_ICONEXCLAMATION);
return;
}//ende if
MessageBox(AppHandle, "Einleitung war erfolgreich.", "",
MB_ICONINFORMATION);

Code: Alles auswählen

If OpenLibrary(0,"C:\ComDrvS7V6_Net.dll") ; Name of DLL to browse. 
        CallFunction(0, "MPI6_OpenRS232" ,-1, 2, 115200, 0,31)
  CloseLibrary(0) 
Else
Debug Error
EndIf

Code: Alles auswählen

If OpenLibrary(0, "C:\ComDrvS7V6_Net.dll")
	ExamineLibraryFunctions(0)
	While NextLibraryFunction()
		Debug LibraryFunctionName() + " at adress " + Str(LibraryFunctionAdress())
	Wend
EndIf