Solved

function WideBytesOf for delphi 7

Posted on 2011-03-04

Delphi

1 solution

849 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

Comment

Question by:Torin66

[X]

Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

Help others & share knowledge
Earn cash & points
Learn & ask questions

Join The Community

2 Comments

LVL 24

Accepted Solution

by:jimyX

jimyX earned 125 total points

ID: 350417902011-03-04

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.

Author Closing Comment

by:Torin66

ID: 350418072011-03-04

Thank you very much

Featured Post

Question has a verified solution.

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

Adding threads for loading data in background to a delphi application

Article by: Geert

Have you ever had your Delphi form/application just hanging while waiting for data to load? This is the article to read if you want to learn some things about adding threads for data loading in the background. First, I'll setup a general applica…

Delphi

Implementing a ListView in Firemonkey

Article by: LesterClayton

Introduction Raise your hands if you were as upset with FireMonkey as I was when I discovered that there was no TListview. I use TListView in almost all of my applications I've written, and I was not going to compromise by resorting to TStringGrid…

Delphi

NetCrunch network monitor live walk-through

Video by: AdRem

NetCrunch network monitor is a highly extensive platform for network monitoring and alert generation. In this video you'll see a live demo of NetCrunch with most notable features explained in a walk-through manner. You'll also get to know the philos…

How to monitor services on your network and why?

Video by: AdRem

Monitoring a network: how to monitor network services and why? Michael Kulchisky, MCSE, MCSA, MCP, VTSP, VSP, CCSP outlines the philosophy behind service monitoring and why a handshake validation is critical in network monitoring. Software utilized …