-1

Memo1からランダムな行を選択し、それをリンクとして実行します。次のコードを試しました。

ShellExecute(Handle, 'open', PAnsiChar(RandomRange(Memo1.Lines[1], Memo1.Lines.Count)), nil, nil, SW_SHOWNORMAL) ;

しかし、エラーが表示されます。

Unit1.pas(86): E2010 Incompatible types: 'Integer' and 'string'

だから私の質問は:TMemoからランダムな行を選択するにはどうすればよいですか?

ありがとうございました。

4

1 に答える 1

7

する必要があります

ShellExecute(Handle, 'open', PChar(Memo1.Lines[RandomRange(0, Memo1.Lines.Count-1)]), nil, nil, SW_SHOWNORMAL) ;
于 2012-06-18T15:57:38.593 に答える