View Full Version : ahhh short delphi keygen question!!!
ON'error
December 21st, 2001, 11:48
hi,
how can i get the ascii value of a string("r"

? in vb6 is the function asc(String) but in delphi 4?
DakienDX
December 21st, 2001, 12:00
Hello ON'error !
Byte := Ord(Char)
String := Chr(Byte)
I hope this helps.
ON'error
December 21st, 2001, 16:51
...
edit3.text:= ord(copy(Name,2,1)) calls an error. ord('r') not.
incompatible types! it should exist a mix between vb n' delphi.
do someone of you have a keygen source in object pascal?:
I just want to add all ascii values of the bytes from a string.
stealthFIGHTER
December 21st, 2001, 19:12
Hello:
1) edit3.text is
String
2) ord(copy(Name,2,1)) is
Integer
Of course these types are incompatible

.
To convert Integer to String you must use
IntToStr function.
Type: edit3.text:= IntToStr(ord(copy(Name,2,1)));
sF
ON'error
December 22nd, 2001, 05:29
yes, i forgot to write this in my post, but though if i use inttostr() there comes an error.
ManKind
December 22nd, 2001, 12:29
You can find some Turbo Pascal 7 keygen sources at this site:
http://kickme.to/ManKind2K
Download the archive1 ... Don't flame me, you asked for object pascal and version 7 of Turbo Pascal is very much object orientated

)
Delphi is indeed a very powerful compiler

)
Regards,
ManKind
stealthFIGHTER
December 22nd, 2001, 18:35
Quote:
Originally posted by ON'error
...
edit3.text:= ord(copy(Name,2,1)) calls an error. ord('r') not.
incompatible types! it should exist a mix between vb n' delphi.
do someone of you have a keygen source in object pascal?:
I just want to add all ascii values of the bytes from a string. |
I think you mean this:
var i, CharVal : Integer;
__ SomeString, Result : String;
for i := 1
to length(SomeString)
do
begin
__ CharVal := Ord(SomeString[I]);
__ Result := Result + IntToStr(CharVal);
end;
edit1.text := Result;
You can visit my page - I have some tutorials how to make kg (Delphi sources).
Author := '
sF'
ON'error
December 23rd, 2001, 08:49
jup, thanks now ive finished my keygen 4 bengalys 3rd crackme!
Powered by vBulletin® Version 4.2.2 Copyright © 2018 vBulletin Solutions, Inc. All rights reserved.