Question : Delphi - Load Strings from RCData?

Hello Experts,
I Compilled Strings in a ressource file:
RC_RCData.txt > Hello\nHow\nAre\nYou

1 RCData RC_RCData.txt

i attched this ressource file to my project,
now i want to read and get those strings separated in vars like this:

Example:
var
String1, String2, String3 : String;
Begin
String1:= ReadStringFromRCDATA('1');// Hello
String2:= ReadStringFromRCDATA('2');// How
String3:= ReadStringFromRCDATA('3');//Are
....
end;

Dont ask me to use StringTable
because i tryed it and its worked but the problem i am changing the strings in the Client Program
and till now did not found how to update String Table Ressource in Delphi
the question is here: http://www.experts-exchange.com/Programming/Languages/Pascal/Delphi/Q_26352150.html

anyway i asked this question because i changed my strings to RCDATA ressoource not String Table Ressource.

Good Luck Guys

Answer : Delphi - Load Strings from RCData?

Load your Resource from a ResourceStream as EscuroAnjo hinted, then create a TStrings descendant that will load its content from that stream. You will then have all your strings in each line of TStrings, ready to be accessed.

                       
         
           
             1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:

           
           
             Procedure LoadStringTable(TableName:String;SL:TStrings);
var
 RS: TResourceStream;
begin
 RS := TResourceStream.Create( HInstance, TableName, RT_RCDATA);  
 try
  SL.LoadFromStream(RS); 
 finally
  RS.Free;
 end;
end;

// Usage :

var  
 String1, String2, String3 : String;
 StrList:TStringList;
Begin
 StrList:=TStringList.Create;
 try
  LoadStringTable('RCData',StrList);
  String1:= StrList[0];
  String2:= StrList[1];
  String3:= StrList[2];
 finally
  StrList.Free;
 end;
end;
           
         