Mega Code Archive

 

Categories / Delphi / VCL

 

How to copy the current line of a Stringgrid into a TEdit

Title: How to copy the current line of a Stringgrid into a TEdit procedure TForm1.StringGrid1Click(Sender: TObject); var s: string; begin // Text der Zelle holen s := StringGrid1.Cells[StringGrid1.Col, StringGrid1.Row]; if Length(s) 1 then //L?nge des Text ¨¹bepr¨¹fen begin Edit2.Text := s; // Text ausgeben end; end;