Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.02 c