ahhh short delphi keygen question!!!

[ON'error]

hi,
how can i get the ascii value of a string("r")? in vb6 is the function asc(String) but in delphi 4?

[DakienDX]

Hello ON'error !

Byte := Ord(Char)
String := Chr(Byte)

I hope this helps.

[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.

[stealthFIGHTER]

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]

yes, i forgot to write this in my post, but though if i use inttostr() there comes an error.

[ManKind]

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]

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]

jup, thanks now ive finished my keygen 4 bengalys 3rd crackme!