[delpi12]

как получить текст выделенный строки stringgrid delphi в label1 ?

[Alegun]

Всё зависит от того, что вы подразумеваете под "выделенный строки", вероятны два варианта

Код:

...

var
i,j: integer;
begin
with stringgrid do
for i := 0 to ColCount-1 do
 for j := 0 to RowCount-1 do
  if (i >= Selection.Left)   and
     (i <= Selection.Right)  and
     (j >= Selection.Top)    and
     (j <= Selection.Bottom) then

// содержимое выделенной ячейки
   label1.Caption:= Cells[i, j];

// или содержимое всей строки с выделенной ячеёй
   label1.Caption:= StringReplace(Rows[j].Text, #$D#$A, ' ', [rfReplaceAll]);
end;
...