掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
Formで表示した内容をCSV形式で保存するには (ID：28212)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
すみません。 ①は、デスクトップの指定先が分からなくて。 ②で、label1〜6までcsv上部に追記できましたが、4〜6を1〜3の横に表示したいのですがわかりません。 procedure TForm2.BitBtn1Click(Sender: TObject); var i,j:integer; f:textfile ; st:string; begin AssignFile(f,'c:\test.csv'); rewrite(f); writeln(f,groupbox1.caption); writeln(f,label1.caption); writeln(f,label2.caption); writeln(f,label3.caption); writeln(f,label4.caption); writeln(f,label5.caption); writeln(f,label6.caption); for i:=0 to StringGrid1.Colcount-1 do begin st:=StringGrid1.Rows[i].CommaText; writeln(f,st); end; CloseFile(F); end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.