0

このようなコードを使用して、を使用してアラートを表示しTdxAlertWindowManagerます。これにより、1つのアラートウィンドウが表示され、このウィンドウにはいくつかのメッセージが表示されます。私がやりたいのは、テキストの最初の行を含むアラートウィンドウを表示し、同じウィンドウに新しいテキストを配置したいことです。このプログラムは、コンピューターをいくつかのネットワーク共有に接続するために使用され、私が伝えたいメッセージは次のようになります。

Connecting drive y: to \\server\foldery
Connecting drive x: to \\server\folderx

残りの株式についても同様です。しかし、私はそれをどうやって行うのか理解できませんTdxAlertWindowManager

数年前、nxAlertBergソフトウェアから使用したプログラムを作成したとき、それはもう利用できません。その上でこれを行うことは問題ありませんでした。

if fAlertWindow = nil then
  dxAlertWindowManager.Show(sHpAlertCaption, AlertText, fIndex).Tag := 1
else
  begin
    fAlertWindow.MessageList.Add(sHpAlertCaption, AlertText, fIndex);
    fAlertWindow.RestartDisplayTimer;
  end;
4

1 に答える 1

1

TdxAlerWindowManager改行を表示する方法はわかりませんが、現在のメッセージを変更する方法は知っています。Items[0]のプロパティを編集するだけMessageListです。タイマーでやります。

var
fAlertWindow: TdxAlertWindow;

procedure TFMain.Timer1Timer(Sender: TObject);
begin
  fAlertWindow := dxAlertWindowManager1.Show('Caption', 'Hello1');
  Timer1.Enabled := False;
end;

procedure TFMain.Timer2Timer(Sender: TObject);
begin
  fAlertWindow.BeginUpdate;
  fAlertWindow.MessageList.Items[0].Text := 'Hello2';
  fAlertWindow.EndUpdate;
  Timer2.Enabled := False;
end;

100％動作します

于 2012-10-27T17:46:34.177 に答える