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

Вниз

The Question. Simply Question.   Найти похожие ветки 

 
PaRL ©   (2002-04-18 18:06) [0]

Есть два вопроса. Хотелось бы получить внятные ответы:)
Первый.
Старо как мир. Как сделать так, чтобы форма была всегда поверх главной.

Второй.
Есть TreeView. В нем допустим три узла один в другом:
Первый узел
|_Второй узел
|_Третий узел

Нажимаю два раза на третий - в TEdit выводится Первый узел, Второй и Третий через пробелы. Как сделать

ЗЫ PLZ


 
vlv ©   (2002-04-18 18:17) [1]

1) FormStyle := fsStayOnTop

2)
procedure TForm1.Button1Click(Sender: TObject);
var s:string;
Node : TTreeNode;
begin
Node := TreeView1.Selected;
if Assigned(Node) then begin
s := Node.Text;
while Assigned(Node.Parent) do begin
Node := Node.Parent;
s := Node.Text + " " + s;
end;
end;
ShowMessage(s);
end;



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

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

Наверх




Память: 0.46 MB
Время: 0.007 c
3-2458
vladimirb
2002-04-10 16:38
2002.05.02
Проблема с BDE!!! Дает ошибку в CGI. Help me, please!!!


6-2640
Basty
2002-02-16 09:26
2002.05.02
проблема с Server Socket


3-2479
Vitek_m
2002-04-11 12:09
2002.05.02
DLL + DB


14-2648
Scald
2002-03-25 13:28
2002.05.02
IP


14-2670
lipskiy
2002-03-27 01:46
2002.05.02
Люди! Не дайте моему крику уйти в пустоту! Ищу параметры сигналов VGA-мониторов!