DriveComboBox1->edit.text->DriveComboBox2

← →
Змей © (2006-02-12 01:03) [0]

Здравствуйте Мастера!
можно ли как нибудь из DriveComboBox1
перегнать содержимое будь то в edit1.text
а потом в DriveComboBox2???
ну чтобы при изменении в DriveComboBox1 текст обновлялся в
DriveComboBox2 и становился таким же как и в DriveComboBox1
СПАСИБО!

← →
mr.Evil © (2006-02-12 02:14) [1]

Если правильно понял вопрос то так:

procedure TForm1.DriveComboBox1Change(Sender: TObject);
begin
DriveComboBox2.Drive := DriveComboBox1.Drive;
end;

или

DriveComboBox2.Items := DriveComboBox1.Items;

← →
Змей © (2006-02-12 23:22) [2]

чуть не так:)
я хочу чтобы все диски попорядку перенеслись в edit1.text
я попробовал edit1.text:=DriveComboBox1.Items.CommaText они пишутся но в ковычках и через запятые.

← →
McSimm © (2006-02-13 00:06) [3]

> они пишутся но в кавычках и через запятые.
А как вам хотелось бы ?

var I : integer;
begin
for I := 0 to Количество дисков do
edit1.text := edit1.text + DriveComboBox1.Items[I]
end;

DriveComboBox1->edit.text->DriveComboBox2 Найти похожие ветки