Pergunta : Delphi - cordas da carga de RCData?

Olá! peritos, cordas do
I Compilled em uma lima de recurso: o
RC_RCData.txt > olá! \

i do nHow \ nAre \ nYou

1 RCData RC_RCData.txt attched esta lima de recurso a meu projeto, o
now que eu quero ler e começ aquelas cordas separadas nos vars como esta:

Example:
String1 do
var, String2, String3: Corda;
Begin
   String1:= ReadStringFromRCDATA (“1”); // Hello
   String2:= ReadStringFromRCDATA (“2”); // How
   String3:= ReadStringFromRCDATA (“3”);
do //are….
end; o

Do para não pedir que eu use StringTable
because eu tentei o e seu trabalhado mas o problema eu estou mudando as cordas no cliente Program
and até que agora não encontrar como atualizar o recurso da tabela de corda na pergunta de Delphi
the estiver aqui: href= " http://www.experts-exchange.com/Programming/Languages/Pascal/Delphi/Q_26352150.html " do o ramming/Languages/Pascal/Delphi/Q_26352150.html

anyway do e.com/Prog de http://www.experts-exchang eu fiz esta pergunta porque eu mudei minhas cordas à sorte Guys da tabela de corda Ressource.


Good class= do

Resposta : Delphi - cordas da carga de RCData?

Carregar seu recurso de um ResourceStream como EscuroAnjo sugeriu, a seguir criar um descendente de TStrings que carregue seu índice desse córrego. Você terá então todas suas cordas em cada linha de TStrings, pronta para ser alcançado.
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:

Procedimento LoadStringTable (TableName: Corda; SL: TStrings);
var
 RS: TResourceStream;
começar
 RS: = TResourceStream.Create (HInstance, TableName, RT_RCDATA);  
 tentativa
  SL.LoadFromStream (RS); 
 finalmente
  RS.Free;
 extremidade;
extremidade;

Uso de //:

var  
 String1, String2, String3: Corda;
 StrList: TStringList;
Começar
 StrList: =TStringList.Create;
 tentativa
  LoadStringTable (“RCData”, StrList);
  String1: = StrList [0];
  String2: = StrList [1];
  String3: = StrList [2];
 finalmente
  StrList.Free;
 extremidade;
extremidade;
Outras soluções  
 
programming4us programming4us