![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
DriveComboBox1->edit.text->DriveComboBox2
Змей © (2006-02-12 01:03:00)Здравствуйте Мастера!
можно ли как нибудь из DriveComboBox1
перегнать содержимое будь то в edit1.text
а потом в DriveComboBox2???
ну чтобы при изменении в DriveComboBox1 текст обновлялся в
DriveComboBox2 и становился таким же как и в DriveComboBox1
СПАСИБО!
mr.Evil (2006-02-13 01:08:00) [1]var I : integer;
begin
for I := 0 to Количество дисков do
edit1.text := edit1.text + DriveComboBox1.Items[I]
end;
McSimm (2006-02-13 00:06:00) [2]> они пишутся но в кавычках и через запятые.
А как вам хотелось бы ?
Змей (2006-02-12 23:22:00) [3]чуть не так:)
я хочу чтобы все диски попорядку перенеслись в edit1.text
я попробовал edit1.text:=DriveComboBox1.Items.CommaText они пишутся но в ковычках и через запятые.
mr.Evil (2006-02-12 02:14:00) [4]Если правильно понял вопрос то так:
procedure TForm1.DriveComboBox1Change(Sender: TObject);
begin
DriveComboBox2.Drive := DriveComboBox1.Drive;
end;
или
DriveComboBox2.Items := DriveComboBox1.Items;