Текущий архив: 2004.07.04;
Скачать: CL | DM;
Вниз
TStrings Найти похожие ветки
← →
zep © (2004-06-21 11:19) [0]подскажите как из TStrings в String перевести
← →
serge © (2004-06-21 11:23) [1]ST : TStrings;
ST.Text [CommaText] ???
← →
Anatoly Podgoretsky © (2004-06-21 11:27) [2]S := Ss.Text;
← →
zep © (2004-06-21 11:49) [3]мне надо сторчками с ListBox заполнить столбец в StringGrid
а он выдает ошибку
[Error] Unit1.pas(76): Incompatible types: "String" and "TStrings"
← →
serge © (2004-06-21 11:50) [4]SG.Cells[Row,Col]:=LB.Items[YourIndex];
← →
Digitman © (2004-06-21 11:54) [5]var
MyListBox: TListBox;
..
StringGrid.Cols[индекс_колонки] := MyListBox.Items;
← →
zep © (2004-06-21 11:59) [6]делаю так но почемуто не выходит
procedure TForm1.Button1Click(Sender: TObject);
begin
if ListBox1.ItemIndex =-1 then exit;
ListBox2.Items.add(ListBox1.Items[ListBox1.ItemIndex]);
ListBox1.Items.Delete(ListBox1.ItemIndex);
StringGrid1.Cells[1,0]:=ListBox2.Items[ListBox2.ItemIndex];
end;
← →
pasha_golub © (2004-06-21 12:03) [7]zep © (21.06.04 11:59) [6]
Ясен пень, а кто тебе сказал, что вновь добалвенная строка сразу станет выделенной во втором листбоксе?
← →
zep © (2004-06-21 12:06) [8]Digitman © (21.06.04 11:54) [5]
var
MyListBox: TListBox;
..
StringGrid.Cols[индекс_колонки] := MyListBox.Items;
все заработало так. спасибо
Страницы: 1 вся ветка
Текущий архив: 2004.07.04;
Скачать: CL | DM;
Память: 0.48 MB
Время: 0.047 c
