StringGridに表示するには？

解決

デル 2005-12-07 22:41:30 No: 19091 IP: 192.*.*.*

初心者なんですけど、StringGridにＥｘｃｅｌからコンマ区切りの文で読み込んで表示させるようにしているのですが、半角のスペースがあってもＣｅｌｌが次のＣｅｌｌに変わってしまいます。半角のスペースでもＣｅｌｌが変わらない様にできませんか？

編集削除

初心者だからどうした 2005-12-08 01:07:52 No: 19092 IP: 192.*.*.*

こういうのは参考にならんか？
https://www.petitmonte.com/bbs/answers?question_id=2926

編集削除

初心者だからどうした 2005-12-08 01:08:49 No: 19093 IP: 192.*.*.*

「くりりんノコトカー！」氏のレスね

編集削除

デル 2005-12-08 03:56:25 No: 19094 IP: 192.*.*.*

最近プログラムを始めたばかりなんでよくわからないんですけど(;_:)
これだったらどこを直したらいいのですか？

procedure TForm1.Button1Click(Sender: TObject);
var
  F : TextFile;
  Str : String;
  RowCNT : Integer;
  Buf : array [0..255] of Char;
  i:String;
begin
  if not OpenDialog1.Execute then exit;
  AssignFile(F,OpenDialog1.FileName);
  ReSet(F);
  RowCNT := 0;
  try
    While not EOF(F) do
    begin
      Readln(F,Str);
      StringGrid1.Rows[RowCNT].CommaText:= Str;
      if RowCNT<>0 then
      if StringGrid1.Cells[8,RowCNT]<>' ' then
      ComboBox1.Items.Append(StringGrid1.Cells[8,RowCNT]);
      Inc(RowCNT);
    end;
  finally
    CloseFile(F);
  end;
end;

編集削除

デル 2005-12-08 05:02:22 No: 19095 IP: 192.*.*.*

初心者だからどうしたさんありがとうございました。
ちょっと考えて実行してみたら成功しました。

編集削除