Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations Rhinorhino on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
Loop
- Thread starter ozi403
- Start date
DelphiAaron
Programmer
var i:integer;
begin
for i:=0 to memo1.lines.count -1 do
showmessage(memo1.lines);
end;
Aaron
begin
for i:=0 to memo1.lines.count -1 do
showmessage(memo1.lines);
end;
Aaron
Wouldn't this also work:
var s : string;
begin
for s in memo1.lines do
showmessage(s);
end;
Or is that too much of a flash back to the scripting days?
~
Give a man some fire, he will be warm for a day, Set a man on fire, he will be warm for the rest of his life.
var s : string;
begin
for s in memo1.lines do
showmessage(s);
end;
Or is that too much of a flash back to the scripting days?
~
Give a man some fire, he will be warm for a day, Set a man on fire, he will be warm for the rest of his life.
whosrdaddy
Vendor
Opieo, that syntax will only work in the newer versions of delphi (from 2005 - I think).
-----------------------------------------------------
What You See Is What You Get
Never underestimate tha powah of tha google!
-----------------------------------------------------
What You See Is What You Get
Never underestimate tha powah of tha google!
Stretchwickster
Programmer
Opieo, whosrdaddy,
That code certainly doesn't work in Delphi 6, but then the OP didn't state what version of Delphi they were using!
Clive
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
"To err is human, but to really foul things up you need a computer." (Paul Ehrlich)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
To get the best answers from this forum see: faq102-5096
That code certainly doesn't work in Delphi 6, but then the OP didn't state what version of Delphi they were using!
Clive
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
"To err is human, but to really foul things up you need a computer." (Paul Ehrlich)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
To get the best answers from this forum see: faq102-5096
- Status