Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.05.02;
Скачать: [xml.tar.bz2];




Вниз

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;




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.05.02;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.74 MB
Время: 0.014 c
1-2619            Cansas & Rush    2002-04-19 23:30  2002.05.02  
Как в Image получить иконку связанную с любым файлом?


7-2693            RUS1                  2002-02-05 12:25  2002.05.02  
Господа!!! Как сделать чтобы прога сама себя удалила после выполнения


3-2491            Скалли                2002-04-11 13:53  2002.05.02  
Подход к сложной выборке


3-2462            Den_                  2002-04-10 11:12  2002.05.02  
Уважаемые Мастера!


1-2613            Satirus               2002-04-20 15:51  2002.05.02  
TreeView : LoadFromFIle( file.xml );