Forum: Sonstige Fragen zu Delphi
Delphi
by robinWie,
24. Apr 2008
Ja Ja ich weiss der Thread is schon verdammt alt aber ich habe eine simple Funktion gebastelt um das Problem mit der Checksumme zu lösen.
function GetChecksum(Card, Relay: integer; CMD: string): integer;
var
i: Extended;
ASC_C: integer;
ASC_R: integer;
A: Extended;
B: Extended;
_i: integer;
Forum: Sonstige Fragen zu Delphi
Delphi
by robinWie,
30. Apr 2007
Hier ist mein Ansatz aus einer Prozedur. Ich hab immer diesen Fehler:
procedure TMainForm.SetRelay(Card, Relay: Char);
var
CMD: Char;
ST: CHAR;
S: String;
begin
CMD := 'S';
Forum: Sonstige Fragen zu Delphi
Delphi
by robinWie,
30. Apr 2007
ich hab mit das von Beitrag #14 mal angeguckt und rumprobiert. Ich bekomme das einfach nicht anlaufen und werde mit Fehlermeldungen überschüttet.
Forum: Sonstige Fragen zu Delphi
Delphi
by robinWie,
30. Apr 2007
Das $13 gibt nicht die Adresse der Karte an. Die Adresse kommt als 2.
Du hast recht. Ich würde das auch lieber berechnen als irgendwelche Konstanten abfragen. Aber ich hab das mit den Berechnen nicht ganz verstanden wie das geht. Text aus dem Handbuch
Forum: Sonstige Fragen zu Delphi
Delphi
by robinWie,
7. Dez 2006
Für die, die immernoch nicht verstanden haben, wie man die Checksummen ausrechnet (mich eingeschlossen) poste ich hier mal ne Liste, die die richtigen Summen enthält. Ich habe einfach bei den Befehlen eine FOR-Schleife von 0 bis 255 durchlaufen lassen und geguck wo das Relai schaltet.
Hier ist die Tabelle
Relai | Set | Clear | Toogle
============================
1 | 110 | 126 | 109...