Entwickler-Ecke
Sonstiges (Delphi) - IntTohex Frage
ECO - Fr 24.09.04 17:16
Titel: IntTohex Frage
Hallo zusammen!
Habe vollgendes Prob.
Möchte ein Edit1.Text(string) in hex einlesen.
Das funktioniert auch.
Code.
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
| function stringtohex(s:string):string;
var i:integer;
var result:string;
begin
for i:=1 to length(s) do result:=result+inttohex(ord(s[i]),1);
end; |
So jetzt möchte ich aber mit den einzelnen Hexwerten weiter arbeiten.
Beisp.
ECO= 45 43 4F
Edit2 zeigt mir jetzt 45 43 ... an
ich möchte aber mit der 45 weiter rechnen zb. um 1 erhöhen oder 45 +43 +4F addieren.
Kann mir jemand dabei helfen Kleines beispiel wäre schön.
Mfg
ECO
Moderiert von 
Christian S.: Delphi-Tags hinzugefügt.
.Chef - Fr 24.09.04 17:21
Entweder du speicherst die Werte zwischen, oder du wandelst sie aus dem Edit raus um. Beispiel:
Delphi-Quelltext
1:
2:
3:
4:
| var
x : Integer;
begin
x:=HexToInt('$'+Copy(Edit1.Text,1,2)); |
Das musst du dann ggf. an deinen Edit-Text anpassen.
Gruß,
Jörg
ECO - Sa 25.09.04 16:18
Hallo !
So funktioniert das nicht kann mir das irgenwie mal jemannd genauer erklären.
In einem Edit stehen Buchstaben die sollen in eimem Hexwert umgewandelt werden.
und dann alle buchstaben (Hexwerte) zusammen gezählt werden.
Und das ergebnis dann in einem Label Angezeigt werden.
Bitte mit Beispiel programmiere noch nicht so lange.
Vielen Dank im vorauß!!
ECO
.Chef - Sa 25.09.04 17:59
| ECO hat folgendes geschrieben: |
| So funktioniert das nicht kann mir das irgenwie mal jemannd genauer erklären. |
Was isn das wieder für ne Fehlerbeschreibung? Und was heißt hier "so funktioniert das nicht". Das wandelt akkurat den ersten Eintrag in deinem Edit Feld (45, falls du's vergessen hast) in einen Integerwert (im vorliegenden Fall wäre das 69) um, mit dem du dann rechnen kannst.
Wenn du alle Werte brauchst, also auch die nachfolgend durch Leerzeichen getrennten, musst du den String verarbeiten. Benutze dazu die Befehle, die in meiner Sig unter 1. stehen und lies die Hilfe!
Gruß,
Jörg, der nichts mehr hasst als Kritik an seinen Beispielen.
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!