Editにフォーカスを渡さないためには??

解決

ＰＧ  2009-07-02 22:47:00  No: 35021  IP: 192.*.*.*

Editを表示専用にしたいです!
readonlyをTrueにしても一応フォーカスは入るみたいなので、無視できないでしょうか??

環境はDelphi6です。

編集 削除
DEKO  2009-07-02 23:02:48  No: 35022  IP: 192.*.*.*

StaticText を使ってみてはいかがでしょうか？
以下をクリップボードにコピーして、フォームに貼り付けてみて下さい。

object StaticText1: TStaticText
  Left = 48
  Top = 160
  Width = 121
  Height = 20
  AutoSize = False
  BevelKind = bkSoft
  BorderStyle = sbsSunken
  Caption = 'StaticText1'
  ParentColor = False
  TabOrder = 0
end

# 縦位置の微調整は必要ですが...。

編集 削除
moocho  2009-07-02 23:48:09  No: 35023  IP: 192.*.*.*

こんな方法は？

TPanelなんかをフォームに貼って
  Panel1: TPanel;

procedure TForm1.Edit1Enter(Sender: TObject);
begin
  Panel1.SetFocus;
end;

．．で飛ばすとか！

編集 削除
KHE00221  2009-07-03 01:28:29  No: 35024  IP: 192.*.*.*

下にパネルを敷いてパネルのENABLEDをFALSEにする

編集 削除
ラベル  2009-07-03 07:44:57  No: 35025  IP: 192.*.*.*

フォーカスを当てさせずに（と言うことは入力もさせない？）
表示と言うのであれば．．．

TLabel を貼ってそれに表示させる．．ってのはどうですか？
（意味が違うのかな？？）

編集 削除
どやさ  2009-07-03 08:23:52  No: 35026  IP: 192.*.*.*

OnEnter でフォーカスをとめる。
これでどやさっ！


procedure TForm1.EditEnter(Sender: TObject);
begin
  ActiveControl := nil;
end;

編集 削除
PG  2009-07-03 08:24:59  No: 35027  IP: 192.*.*.*

皆さんいろいろなご指導ありがとうございます。
早速やってみたいと思います。

編集 削除