[Delphi] StringGrid pytanko

0

mam StringGrid i wpisane w niego różne dane - jak zaprogramować przycis żeby dane zostały przeniesione np. do memo dodając do każdej kratki jakiś tekst [???] pewnie troche zamieszałem ale mam nadzieje że to zrozumiecie i mi pomożecie [browar]

0

Zalezy czy interesuja cie same dane czy maja one tez znajdowac sie w "prowizorycznych ramkach.

Jezeli tylko dane to musisz po kolei przeszukiwac StringGrida i przenosic do Memo az StringG.. bedzie pusty.

For i:=0 to stringgrid.rowcount do
Memo1.Lines.Add(stringgrid.cells[1,i]);

Cus w tym stylu ??

0

Proponuję pętelkę - odczytuje tekst z poszczególnych wierszy i oddziela je jakimś znakiem np @. Taką linię można odczytać tak:

var
w:String;
begin
w:=Jakiś tekst@Jakiś tekst@...
Label1.Caption := Copy(w, 0, Pos('@', w) -1); // odczytanie pierwszego czlonu linii na podstawie znaku @
Label2.Caption := Copy(w, Pos('@', w) + 1, 200); // odczytanie drugiego czlonu linii na podstawie znaku @
end;

a pobierać i wpisywać wartości możesz tak:

StringGrid1.Cells[x,y]:=Tekst; //wczytanie wartości
Tekst:=StringGrid1.Cells[x,y]; // pobranie wartości
StringGrid1.RowCount i ColCount //liczba lini i kolumn

1 użytkowników online, w tym zalogowanych: 0, gości: 1