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

解決

ＰＧ 2009-07-03 07:47:00 No: 35021

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

環境はDelphi6です。

DEKO 2009-07-03 08:02:48 No: 35022

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-03 08:48:09 No: 35023

こんな方法は？

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

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

．．で飛ばすとか！

KHE00221 2009-07-03 10:28:29 No: 35024

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

ラベル 2009-07-03 16:44:57 No: 35025

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

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

どやさ 2009-07-03 17:23:52 No: 35026

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

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

PG 2009-07-03 17:24:59 No: 35027

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