cxGrid, Dev Express, Delphi XE2

[nactyx]

Всем добрый день!

Подскажите, пожалуйста, где можно найти толковые примеры работы или вообще F.A.Q по работе с cxGrid? Или может кто-то работает и сможет ответить на несколько вопросов? Заранее благодарю за помощь.

[Alex11223]

Если не задавать вопрос, то точно никто не сможет.

[nactyx]

Имеется проект, в котором используется cxGrid. Нужно реализовать возможность путем использования CTRL + C из Excel в этот грид.

Я реализовал это используя ListBox. Вот теперь размышляю, как это перенести на cxGrid.

Вот мой код:

procedure TForm1.Button1Click(Sender: TObject);
var s: string;
    i, n: Integer;
begin
  if (Clipboard.HasFormat(CF_TEXT)) and (Clipboard.AsText <> '') then
  begin
    s := Clipboard.AsText;
    s := StringReplace(s, #$D#$A, ' ', [rfReplaceAll]);
    n := 1;
    i := 1;
    while i <= length(s) do
    begin
      if (s[i] = ' ') and (s[i+1] <> ' ') then
      begin
        ListBox1.Items.Add(copy(s, n, i-n));
        n := i+1;
        inc(i);
      end
      else
        inc(i);
    end;
  end
  else
    MessageDlg('В буфере обмена ничего нет', mtInformation, [mbOK],0);
end;