Wayne Barron
asked on
Loop through and Insert Numbers into URL of RichEdit component (Code Supplied)
Hello All;
I am using the following code to created a list of Links to our companies Website(s).
But instead of it working like it should, it is not working at all.
========================== ========== ========== ===
procedure TProject1.OButton1Click(Se nder: TObject);
var
CID, Con : String;
I : Integer;
begin
RichEdit3.Clear;
for I := 0 to RichEdit2.Lines.Count -1 do
begin
CID := StringReplace(RichEdit1.Li nes[i], ' ', ' ',[rfReplaceAll]);
Con := StringReplace(RichEdit2.Li nes[i], ' ', ' ',[rfReplaceAll]);
RichEdit3.Lines.Add('http://www.sitename.com/content_by_cat3.asp?contentid='+RichEdit1.Text+'&catid='+RichEdit2.Text+'');
end;
end;
========================== ========== ========== ===
The [RichEdit1] Contains the ContentID #'s
The [RichEdit2] Contains the CatID #'s
Like so:
RichEdit1 has the following Values for ContentID=
56
57
58
59
RichEdit2 has the following Values for CatID=
1
2
3
4
The output needs to look like this in the RichEdit3:
content_by_cat3.asp?conten tid=56&cat id=1
content_by_cat3.asp?conten tid=57&cat id=2
content_by_cat3.asp?conten tid=58&cat id=3
content_by_cat3.asp?conten tid=59&cat id=4
I hope I explained it well enough?
Thanks All, this is sort of agrivating me, as I can make it work any other way except this way.
Carrzkiss
I am using the following code to created a list of Links to our companies Website(s).
But instead of it working like it should, it is not working at all.
==========================
procedure TProject1.OButton1Click(Se
var
CID, Con : String;
I : Integer;
begin
RichEdit3.Clear;
for I := 0 to RichEdit2.Lines.Count -1 do
begin
CID := StringReplace(RichEdit1.Li
Con := StringReplace(RichEdit2.Li
RichEdit3.Lines.Add('http://www.sitename.com/content_by_cat3.asp?contentid='+RichEdit1.Text+'&catid='+RichEdit2.Text+'');
end;
end;
==========================
The [RichEdit1] Contains the ContentID #'s
The [RichEdit2] Contains the CatID #'s
Like so:
RichEdit1 has the following Values for ContentID=
56
57
58
59
RichEdit2 has the following Values for CatID=
1
2
3
4
The output needs to look like this in the RichEdit3:
content_by_cat3.asp?conten
content_by_cat3.asp?conten
content_by_cat3.asp?conten
content_by_cat3.asp?conten
I hope I explained it well enough?
Thanks All, this is sort of agrivating me, as I can make it work any other way except this way.
Carrzkiss
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
its not like I havent done that myself =)
stuff happens...
stuff happens...
ASKER
Havn't we all.
Thanks a bunch
Thanks a bunch
ASKER
Dang, well, I think that I really goofed on that one :)
Excuse me while I go off and kick myself a few times.
That was a Quick 250=4=1,000 Points for you wasn't it?
Take Care and thank you for getting my head out of these Tropical Winds & Rains we are having today.
Carrzkiss