title image


Smiley Re: String als Hex-Wert darstellen
selber machen.........





function stringtohex(s:string):string;

var i:integer;

var hs:string;

begin

for i:=1 to length(s) do result:=result+inttohex(ord(s[i]),1);

end;



procedure TForm1.Button1Click(Sender: TObject);

begin

showmessage(stringtohex('Brummbaer'));

end;





//
// C wurde erfunden, damit die baeume der programmierer
// nicht in den himmel wachsen.
//
// frager


geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: