Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2010.02.14;
Скачать: [xml.tar.bz2];

Вниз

При клике курсором на едите не появляется фокус   Найти похожие ветки 

 
AIK ©   (2009-12-14 16:04) [0]

Создаю новое приложение и сразу же создаю ещё одну форму и кидаю на неё Edit
Подключаю вторую форму к первой и в обработчике на кнопке у первой формы пишу

Form2.Parent:= Form1;
Form2.Show;


И эдит после этого не реагирует на клик левой клавиши мышки по нему, хотя правой клавишей мышки и нажатием клавиши таб я могу навести на неё фокус. Почему такое поведения и как исправить


 
Медвежонок Пятачок ©   (2009-12-14 16:08) [1]

купил телевизор, и сразу вставил отвертку в ухо.
после этого включаю кривое зеркало, но звука нет.
помогите исправить поведение телевизора

ps пробовал вставлять пальцы в розетку, но не помогает.


 
clickmaker ©   (2009-12-14 16:16) [2]

> Form2.Parent:= Form1;

а зачем это, если не секрет?


 
AIK ©   (2009-12-14 16:17) [3]

чоб отобразить внутри первой формы


 
oldman ©   (2009-12-14 16:22) [4]


> AIK ©   (14.12.09 16:17) [3]
> чоб отобразить внутри первой формы


То есть, для этого нужна Form2?
TPanel уже не катит?
И фокусы будут. И чудеса.


 
AIK ©   (2009-12-14 16:22) [5]


> Медвежонок Пятачок ©   (14.12.09 16:08) [1]


Увеличь громкость и высунь отвертку из уха если ту не слышишь с одним ухом


 
Медвежонок Пятачок ©   (2009-12-14 16:24) [6]

хотя правой клавишей мышки и нажатием клавиши таб я могу навести на неё фокус.

Вот правой и пользуйся.


 
Игорь Шевченко ©   (2009-12-14 16:27) [7]

Фреймы рулез


 
Игорь Шевченко ©   (2009-12-14 16:28) [8]

У тебя фокус попадает на форму, а не на эдит. Убери tabstop у формы для начала.


 
AIK ©   (2009-12-14 16:44) [9]


> У тебя фокус попадает на форму

Эт я сразу понял, ведь он всё ещё остается на кнопке


> Убери tabstop у формы для начала.

А дальше.


 
AIK ©   (2009-12-14 16:49) [10]


> oldman ©   (14.12.09 16:22) [4]
> То есть, для этого нужна Form2?
> TPanel уже не катит?
> И фокусы будут. И чудеса.


В принципе это тоже идея, но мне нужны кое какие события формы, а ручками много писать тоже не хотелось бы
И в конце концов как вариант можно потрудится сравнивая координаты курсора с едитом и далее наводить на неё фокус


 
AIK ©   (2009-12-14 17:01) [11]

Пока саммый оптималльный только это

procedure TForm2.Edit1MouseUp(Sender: TObject; Button: TMouseButton;
 Shift: TShiftState; X, Y: Integer);
begin
Edit1.SetFocus;
end;


 
AIK ©   (2009-12-14 17:03) [12]

Хотя писАть ещё надо
чтоб выделяла текст, меню правой мышки для текста


 
Медвежонок Пятачок ©   (2009-12-14 17:05) [13]

ну это же того стоит.
прямые же пути не для всех


 
Игорь Шевченко ©   (2009-12-14 17:29) [14]


> А дальше.


А дальше читай Тейксейру с Пачеко, как одну форму в другую встроить и будет тебе счастье.

Но лучше фреймы использовать для встраивания - они за этим и придуманы.



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2010.02.14;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.47 MB
Время: 0.007 c
15-1260307828
Юрий
2009-12-09 00:30
2010.02.14
С днем рождения ! 9 декабря 2009 среда


2-1260784227
JohnKorsh
2009-12-14 12:50
2010.02.14
Вопрос по бееспроводным сетям.


2-1260803424
Dimon89
2009-12-14 18:10
2010.02.14
Подключение базы после запуска (ConnectionString)


11-1211396216
Vinum
2008-05-21 22:56
2010.02.14
Форма на вообще весь экран


8-1202896327
XProger
2008-02-13 12:52
2010.02.14
FM синтезатор





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский