[Webinar] Streamline your web hosting managementRegister Today

x
?
Solved

function WideBytesOf for delphi 7

Posted on 2011-03-04
2
Medium Priority
?
863 Views
Last Modified: 2013-11-22
I get a program in Delphi 2010, but I have Delphi 7 and I could not compile because there is a function called "WideBytesOf" and there is no Delphi 7. I need an equivalente function or code

thanks
0
Comment
Question by:Torin66
2 Comments
 
LVL 24

Accepted Solution

by:
jimyX earned 500 total points
ID: 35041790
You can use ord():
function WideBytes(Str:String):String;
var
  i:integer;
begin
  Result := '';
  for i := 1 to Length(Str) do
    Result := Result + IntToStr(ord(Str[i]));
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  showmessage(WideBytes('123'));
end;

Open in new window

Bear in mind Delphi 7 does not support Unicode.
0
 

Author Closing Comment

by:Torin66
ID: 35041807
Thank you very much
0

Featured Post

Upgrade your Question Security!

Your question, your audience. Choose who sees your identity—and your question—with question security.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

In this tutorial I will show you how to use the Windows Speech API in Delphi. I will only cover basic functions such as text to speech and controlling the speed of the speech. SAPI Installation First you need to install the SAPI type library, th…
Hello everybody This Article will show you how to validate number with TEdit control, What's the TEdit control? TEdit is a standard Windows edit control on a form, it allows to user to write, read and copy/paste single line of text. Usua…
The video provides a quick and easy steps to migrate MBOX file to well known Outlook PST and Office 365. Besides this, it also supports and migrates more than 20 email clients of MBOX which include AppleMail, Opera, Thunderbird and SeaMonkey effortl…
Get the source code for a fully functional Access application shell with several popular security features that Access VBA application developers desire, but find difficult or impossible to figure out how to code. You get the source code for managi…
Suggested Courses
Course of the Month10 days, 3 hours left to enroll

591 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question