Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

создание простейшего текстового редактора [D7, XP]

my_sweet © (2005-12-06 15:16:00)
Всем приветик!!!!!!!
Плиз, погибаю!!!! Скажите, как можно сделать так, чтобы курсор двигался от слова к слову( ctrl+ вправо, влево), в метке Label ???? при чем СurPos- позиция курсора в строке s, a s:=label1.caption

ПОМОГИТЕ!!!!!!!! :)

my_sweet (2005-12-06 20:10:00) [1]
ладненько шутить!!!! лучше спасите бедную студентку!!!!
вам то это раз плюнуть .... и заодно доброе дело сделаете!!!!!!!!
век буду благодарна!!!

Anatoly Podgoretsky (2005-12-06 20:05:00) [2]
Чем дальше в лес, тем ближе партизаные.
Самые последнии лодыри придут за несколько часов до сдачи.

my_sweet (2005-12-06 19:16:00) [3]
а как насчет замены символа???
и отслеживание пробелов в строке точно никак попроще сделать нельзя????
а то у меня не ваши мозги..... я так через координаты врятли сделаю....:(

Плохиш (2005-12-06 19:05:00) [4]

> my_sweet (06.12.05 18:55) [4]
> понимаете, у меня курсовая... защита чезез неделю вот такое
> задание дали

Короче готовь рюкзак, пойдёшь служить.

Leonid Troyanovsky (2005-12-06 19:02:00) [5]

> my_sweet (06.12.05 18:55) [4]
> понимаете, у меня курсовая... защита чезез неделю вот такое
> задание дали, а что препадам скажешь?????

Скажешь, что редакторы принято делать на основе TWinControl.
Т.е., того, что может принимать фокус ввода.

--
Regards, LVT.

Leonid Troyanovsky (2005-12-06 18:58:00) [6]

> my_sweet (06.12.05 18:41) [2]
> я знаю, что у Label Caret у метки нет, но мне надо это
> сделать!!!!!!!

Caret должен иметь окно-владельца.
Можешь положить Label на TPanel и сделать ее собственником карета.

Ну, а далее, CreateCaret, SetCaretPos, ShowCaret & etc.
Координаты (относительно TPanel) вычисляются самостоятельно,
возможно, при посрестве DrawText & DT_CALCRECT.

--
Regards, LVT.

my_sweet (2005-12-06 18:55:00) [7]
понимаете, у меня курсовая... защита чезез неделю вот такое задание дали, а что препадам скажешь????? еще у меня не очент получается такая функция как "заменить" т.е. insert компилирует но не вставляет, посмотрите пожаллуйста!!!!!
процедура keyPress
case key of
#45 :

if CurPos < length(label1.Caption) then
begin
s:=label1.Caption;
delete(s,curpos+1,1);
insert(key,s,curpos);
inc(curpos);
end;
#27: form1.close;
и т.д.

MBo (2005-12-06 18:47:00) [8]
> мне надо это сделать!!!!!!!
А почему гланды надо рвать через черт знает что, используя компонент, предназначенный исключительно для вывода текста, а не специально обученные делу редактирования Edit, Memo, Richedit...

my_sweet (2005-12-06 18:41:00) [9]
я знаю, что у Label Caret у метки нет, но мне надо это сделать!!!!!!!

Leonid Troyanovsky (2005-12-06 16:46:00) [10]

> my_sweet (06.12.05 15:16)

> курсор двигался от слова к слову( ctrl+ вправо, влево),
> в метке Label ???? при чем СurPos- позиция курсора в строке

Если имелся ввиду Caret (See msdn: Carets), то у TLabel его нет.

--
Regards, LVT.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »