DG8SAQ VECTOR NETWORK ANALYZER VNWA HILFE - SDR-Kits

elease consoleFreeConsole();}// User Function 'Process'// will be called after every complete sweep cycle, if postprocessing is activated//// Pascal declaration:// procedure(FData: Pointer;SType: Integer;SData: Pointer; Len: integer;// what: integer; tm: TDateTime; temp: Double); cdecl;//// Note: Visual C++ Express 2008 does not automatically prefix 'extern "C" __declspec" functions with an// underscore, so we explicitly add one to the function name for this build environmentextern "C" __declspec(dllexport)void _Process (double *FData, int SType, double *SData, int Len,int what, double tm, double temp){char string[50];char sfloat[25];DWORD d;strcpy(string, "UserDLL function Process called.");WriteConsole(ho, string, lstrlen(string),&d, NULL);strcpy(string, "Start Frequency = ");sprintf (sfloat, "%.*f", 10, FData[0]);strcat(string, sfloat);strcat(string, "");WriteConsole(ho, string, lstrlen(string),&d, NULL);strcpy(string, "Stop Frequency = ");sprintf (sfloat, "%.*f", 10, FData[1]);strcat(string, sfloat);strcat(string, "");WriteConsole(ho, string, lstrlen(string),&d, NULL);}Anmerkung : Im Gegensatz zu Borland C ++, underscores in front of the function names, sind hier erforderlich!Die procedure Init initialisiert ein Konsole-Fenster und schreibt ein Kurztelegramm ihm.Die procedure Prozess schreibt einige der passierten Daten zur Konsole.Die procedure Close gibt die Konsole wieder frei.Nach dem Laden des Benutzers dll in VNWA öffnet sich das Konsole-Fenster, wie definiert, in der Funktion init:Init schreibt nur die erste Zeile. Nach jedem Sweep wird eine zusätzliche Nachricht vom Funktionsprozess in dieConsole geschrieben, wie Sie oben sehen.- 382 -