Memo1 Enabled = false, как оставить скролл при таком расскладе?

[AlienNation]

у меня Memo1 должно быть всегда Enabled = FALSE, но! Очень нужен скроллинг, а при таком расскладе он тоже становится DISABLED, что тут возможно сделать, для того чтобы я мог прокркучивать окно Memo1?

[Аватар]

ReadOnly:=True; Enabled:=True;

[AlienNation]

да, вот только мне не нравится что там курсор можно сфокусировать, он там стоит и мигает, как-то это не сходится с общим замыслом программы, перевести сам фокус на что-нть другое конечно можно, но все равно если пользователь кликнет в мемо1 то появится этот курсор и начнет мигать.

[Аватар]

Enabled = FALSE и скроллинг не совместимы

[hon]

Enabled:=true; ReadOnly:=true; и событие Memo OnEnter, (или OnMouseMove, или другое не помню):

procedure ... (Sender: TObject);
begin
Form1.SetFocus; //или на другой комппонент
end;

[Alex11223]

Сообщение от hon

Enabled:=true; ReadOnly:=true; и событие Memo OnEnter, (или OnMouseMove, или другое не помню):

procedure ... (Sender: TObject);
begin
Form1.SetFocus; //или на другой комппонент
end;

Курсор все равно меняться при наведении мыши будет вроде.

[hon]

Сообщение от Alex11223

Курсор все равно меняться при наведении мыши будет вроде.

Ну и что? Ведь изменить нельзя.