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

Вниз

как выбрать путь к файлу и скопировать его в Edit   Найти похожие ветки 

← →
PTE ©   (2002-06-26 17:12) [0]

Здравствуйте
Как выбрать путь к файлу и скопировать его в Edit по нажатию кнопки?

---

← →
PTE ©   (2002-06-26 17:13) [1]

procedure TfmSQL.Button1Click(Sender: TObject);
begin
fmSQL.OpenDialog1.Execute;
end;
end;открыл диалог а скопировать в Edit?

---

← →
PTE ©   (2002-06-26 17:15) [2]

procedure TfmSQL.Button1Click(Sender: TObject);
begin
fmSQL.OpenDialog1.Execute;
fmSQL.Edit3.Text :=fmSQL.OpenDialog1.FileName;
end;получилось

---

← →
Skier ©   (2002-06-26 17:16) [3]

> PTE

Советую так :


procedure TfmSQL.Button1Click(Sender: TObject);
begin
if fmSQL.OpenDialog1.Execute then
fmSQL.Edit3.Text :=fmSQL.OpenDialog1.FileName;
end;


---

← →
rhf ©   (2002-06-26 17:25) [4]

а я так

with fmSQL.openDialog1, fmSQL.Edit3 do
if execute then text:=fileName;


---

← →
PTE ©   (2002-06-26 18:50) [5]

спасибо

---

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

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

Наверх

Память: 0.47 MB
Время: 0.012 c