1

こんにちは、Delphi で (!) ハイパーリンクとして表示される TcxGrid テーブル ビューに列を追加することができました (単純な文字列ではなく)。これを行うには、列の「プロパティ」を編集して「ハイパーリンク」を選択するだけです。セルにハイパーリンク スタイル (下線付き) が表示されるようになりましたが、次の方法は一生わかりません。

  1. リンク上でカーソルを「手」に変更します。
  2. リンクをクリックしたときに発生するイベントを追加します。

誰でも助けることができますか？ありがとう。

4

2 に答える 2

1

プロパティをハイパーリンクに設定した後、プロパティを展開できます。ワンクリックでアクティブ化するには、SiongleClickプロパティをTrueに設定します。

カーソルを変更するのはもっと難しいです。mousemoveイベントに反応して、マウスがハイパーリンク列にカーソルを合わせているかどうかを判断する必要があります。DevExpressサイトから：

procedure TForm1.cxGrid1DBTableView1MouseMove(Sender: TObject;
  Shift: TShiftState; X, Y: Integer);
var
  Ht: TcxCustomGridHitTest;
begin
  Ht := TcxGridSite(Sender).GridView.Viewinfo.GetHitTest(X,Y);
  If (Ht is TcxGridRecordCellHitTest) and
   (TcxGridRecordCellHitTest(Ht).Item.Properties is TcxHyperLinkEditProperties) then
    Screen.Cursor := crHandPoint
  else
    Screen.Cursor := crDefault;
end;

procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
  if Screen.Cursor <> crDefault then
     Screen.Cursor := crDefault;
end;
于 2010-04-23T15:05:25.830 に答える
0

列ヘッダーをクリックすると、列が選択されます。

「イベント」に移動

プロパティ - OnStartClick-> URL をクリックすると、このイベントが発生します。

最新の dev.express がインストールされた Delphi 7 システムでは、URL が存在する場合、カーソルが手の形に変わります。

Dephi 7 のサンプル プログラムと実行可能ファイルを zip 圧縮したので、完全なプロジェクトを自分で確認できます (自分のサイト www.edelcom.com からダウンロード)。

  • 実行を実行します
  • 一番下の挿入ボタンを押す
  • URL を入力してください: www.google.com
  • エンターを押す
  • リンクの上に移動 - 手が表示され、リンクをクリックすると、'clicked' というメッセージが表示されます。これ）
于 2010-04-23T06:44:15.803 に答える