Hallo alle,
ich möchte gern under eine Console App Daten aus eine Scanner auslesen (industrieller 2D scanner, nicht office-Pagescanner.) Scanner ist Host, ich verbinde mit Telnet.
Geht unter test mit
VCL ohne issues.
Problem ist: wie mache ich eine Event-Procedure für "OnDataAvailable" in Console-App ?
Mein Versuch soweit:
Delphi-Quellcode:
program project_console_scanner;
{$APPTYPE CONSOLE}
uses
SysUtils,
// ----------- telnet stuff
IdBaseComponent, IdComponent,
IdTCPConnection, IdTCPClient, IdTelnet;
var
IdTelnet1 : TIdTelnet;
{-- read the scanner data --}
procedure dataavail(Buffer: String);
...
{--- main program ---}
begin
idtelnet1 := tIDTelnet.create;
IdTelnet1.OnDataAvailable := dataavail; // <<<< geht nicht. "Incompatible types: 'method pointer and regular procedure' "
end.
ich habe auch versucht, wie online gelesen eine class zu erstellen:
Delphi-Quellcode:
class mytelnet
public
procedure read(buffer: string);
end;
...
IdTelnet1.OnDataAvailable := mytelnet.dataavail; // wrong type
ist das überhaupt möglich ? Ich übersehe bestimmt irgendwas.
Danke.