Forum: Sonstige Fragen zu Delphi
Delphi
by kuba,
19. Sep 2009
Hallo,
sch..ade, ich komm nich drauf :pale:
dies sollte doch eigentlich funktionieren:
if Pos('?C*PU',buffer) > 0 then
Edit1.Text:=copy(buffer,(pos('?C*PU',buffer)+5),8);
Forum: Sonstige Fragen zu Delphi
Delphi
by kuba,
18. Sep 2009
Hallo,
ich möchte in meinem buffer noch ein event filtern, das sieht so aus: ?C*PU00000B8F
Dabei ist ?C*PU das Event und 00000B8F die Value in HEX.
Kann mir wohl nochmal jemand auf die Sprünge helfen, mit dem buffer hab ich´s nicht so :cyclops:
kuba
Forum: Sonstige Fragen zu Delphi
Delphi
by kuba,
17. Sep 2009
ich weiss genau was du meinst, ich hatte ungefähr 10 Jahre "Programmierpause". Inzwischen hat sich viel verändert :angel2:
procedure TForm2.Button1Click(Sender: TObject);
var
buffer: shortstring;
dw : dword;
begin
Timer1.enabled:=true;
ReadFile(Pipe, buffer, high(buffer), dw, nil);
Forum: Sonstige Fragen zu Delphi
Delphi
by kuba,
17. Sep 2009
Ja, tatsächlich. Jetzt hab ich die Daten komplett !
procedure TForm2.Button1Click(Sender: TObject);
var
buffer: shortstring;
dw : dword;
begin
Timer1.enabled:=true;
ReadFile(Pipe, buffer, high(buffer), dw, nil);
Forum: Sonstige Fragen zu Delphi
Delphi
by kuba,
17. Sep 2009
Supi, ich habs jetzt:
procedure TForm2.Button1Click(Sender: TObject);
var
buffer: shortstring;
dw : dword;
begin
Timer1.enabled:=true;
ReadFile(Pipe, buffer, sizeof(buffer), dw, nil);
Forum: Sonstige Fragen zu Delphi
Delphi
by kuba,
17. Sep 2009
moment mal, habe ich nach READFILE nicht die Anzahl der gelesenen Bytes in dw ??
Bei buffer := dw; sagt der Compiler client.pas(45): E2010 Inkompatible Typen: 'Char' und 'Cardinal'
Müsste es nicht dw:=0 sein ?
kuba
Forum: Sonstige Fragen zu Delphi
Delphi
by kuba,
17. Sep 2009
welchen Wert dw vor ReadFile hat ? Undefiniert, oder ?
Wieso überschreibe ich den buffer ? Ich fange doch bei 0 an (buffer) und will dann die Länge ausgeben (sizeof(buffer)).
Verstehe nicht :pale:
kubaa
Forum: Sonstige Fragen zu Delphi
Delphi
by kuba,
17. Sep 2009
Das verstehe ich nicht wirklich, wie soll das denn aussehen ?
etwa so ?
buffer := dw;
ReadFile(Pipe, buffer, sizeof(buffer), dw, nil);
kuba
Forum: Sonstige Fragen zu Delphi
Delphi
by kuba,
17. Sep 2009
Hallo,
ich hab hier ein Programm, das kommuniziert über RS232, gibt diese Daten dann per Named Pipes an andere Prozesse weiter.
Mittlerweile habe ich es geschafft die Named Pipe mitzulesen, ich erhalte jedoch immer nur unvollständige Informationen.
ich vermute es liegt an dem eingesetzten Timer, der nach Ablauf den Buffer neu füllt und nichtaufgezeichnete Daten überschreibt.
Aber wie...