文字列を変数名に連結する

Question

これは簡単な質問ですが、2つの文字列を連結して変数名を構成する方法はわかりません。以下のコードは、それをしない方法です...

var 
    UserName1 : String; 
    UserName2 : String; 
    Password1 : String; 
    Password2 : String; 
    UserCount : Integer; 

UserCount := 2; 

for Wk1 := 1 to UserCount do 
begin 
    DoLogin(UserName+Wk1, Password+Wk1); 
end; 

Answer 1

基本的にこれはできません。変数名はコンパイル時に固定され、変数の値を保持するアドレスに変換されます。

配列が必要な場合、またはこの場合は2つのように見えます.1つの配列にはログイン名が格納され、1つの配列にはパスワードが格納されます。もちろん、2つのレコードを結合してレコードの配列を作成することもできます。

type 
LogType = record 
      username, password: string[31] 
      end; 

var 
LogArray: array [1..10] of logtype; 
usercount, wk1: integer; 

begin 
UserCount := 2; 
for Wk1 := 1 to UserCount do 
    begin 
    DoLogin(logarray[wk1].username, logarray[wk1].password); 
    etc 
    end; 
end; 

Answer 2

これを試してはいけません。

Reflection（またはRTTI - 実行時のタイプ情報）が必要になります。Delphiではリリースごとに変更できるので使いにくく、ビルド時にデバッグ情報を含める必要があります。

したがって、1つまたは2つの配列を使用してください。

var 
UserNames[1..2] : String; 
Passwords[1..2] : String; 
UserCount : Integer; 

UserCount := 2; 

for Wk1 := 1 to UserCount do 
begin 
    DoLogin(UserNames[Wk1], Passwords[Wk1]); 
end;