Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.11.13;
Скачать: CL | DM;

Вниз

Свой CodeInsight   Найти похожие ветки 

 
Виктор   (2003-11-03 11:34) [0]

Привет всем!
Может знает кто принцип написания CodeInsight
Например, юзер печатает в RichEdit"е текст, поставил точку (или другой служебный символ) и возле курсора вываливается окошко со списком своих "методов" и "свойств" (их можно хранить в TStringList).
Короче нужен некий аналог дельфовского CodeInsight. Может компонент какой-нить есть?

Спасибо


 
Gero ©   (2003-11-03 11:53) [1]

Можно попататья так:
Создаешь компонент на основе, например, TPanel. Вставляешь в него TListBox со всеми свойствами. Потом пишешь :

procedure RichEdit1KeyPress(.. Key : Char);
var
C : Char;
Count : Integer;
S : string;
begin
if Key = "." then
with RichEdit1 do
begin
C := Text[SelStart];
while not (C in [ #0, #13, " "]) do
begin
Inc(Count);
C := Text[SelStart - Count];
S := S + C;
end;
MyCodeInsight1.Show;
MyCodeInsight1.FindMethod(S);
end;
end;


 
Виктор   (2003-11-03 14:56) [2]

Хотя это далеко не готовое решение, но Вы дали мне направление, в котором надо идти. Спасибо.



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

Текущий архив: 2003.11.13;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.116 c
4-42315
Akvilon
2003-09-06 18:42
2003.11.13
SetWindowLong(hwnd, GWL_WNDPROC ...


7-42159
tvic
2003-09-02 10:59
2003.11.13
Как копировать по частям


1-41381
Denis
2003-10-30 11:53
2003.11.13
Виртуальные и динамические методы


1-41515
Артем
2003-10-25 22:22
2003.11.13
ShellExecute


1-41567
Vivk
2003-11-04 08:23
2003.11.13
Qreport , FreeReport & толщина линий