くだすれDelphi(超初心者用)その46

1 名前： ◆XcB18Bks.Y mailto:sage [2008/03/12(水) 21:09:39 ] Delphi(デルファイ)について、他のスレッドでは書き込めない超低レベル、 もしくは質問者自身何が何だか分からない質問を 勇気を持って書き込むスレッドです。 Delphi使いが優しくコメントを返しますが お礼はDelphiの布教と初心者の救済をお願いします。 <前スレ> くだすれDelphi(超初心者用)その45 pc11.2ch.net/test/read.cgi/tech/1198802907/ <過去スレ> DelWiki避難所（Delphi 関連の過去スレッド） delwiki.info/?Delphi%20%B4%D8%CF%A2%A4%CE%B2%E1%B5%EE%A5%B9%A5%EC%A5%C3%A5%C9 691 名前：デフォルトの名無しさん mailto:sage [2008/05/18(日) 18:21:32 BE:261735-PLT(12660)] >>689 var 　　TestColumn: TListColumn; begin 　　with ListView1 do begin 　　　　TestColumn := Columns.Add; 　　　　TestColumn.Caption := 'A'; 　　　　TestColumn.Width := 100; 　　　　TestColumn := Columns.Add; 　　　　TestColumn.Caption := 'B'; 　　　　TestColumn.Width := 100; 　　　　with Items.Add() do begin 　　　　　　Caption := '1-1'; 　　　　　　SubItems.Add('2-1') 　　　　end; 　　　　with Items.Add() do begin 　　　　　　Caption := '1-2'; 　　　　　　SubItems.Add('2-2') 　　　　end; 　　end; end; 692 名前：デフォルトの名無しさん mailto:sage [2008/05/18(日) 18:24:22 ] >>688 字面の正しさは正規表現でチェック '^([a-zA-Z]\:)|(\\)(\\{1}|((\\{1})[^\\]([^/:*?<>"|]*(?<!\[\])))+)$' ディレクトリが存在してるか、アクセス権があるか等々で失敗する要因が他にもあるから あまりがんばらずに、実際に書き込んでみてから例外拾って対応するのが定石。 >>689 for i := 1 to 2 do 　with ListView1.Items.Add do 　begin 　　Caption := Format('%d-1', [i]); 　　SubItems.Add(Format('%d-2', [i]); 　end;

---

---

[ 続きを読む ] / [ 携帯版 ]

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef