くだすれDelphi(超初� ..

---

[2ch|▼Menu]

237:デフォルトの名無しさん
08/07/29 04:54:47
URLﾘﾝｸ(www12.plala.or.jp)
とりあえずググったら速効出てきた。

238:デフォルトの名無しさん
08/07/29 05:04:08
>>237
そのソースを実装しても全く効果がありませんでした・・・
何か足りないのでしょうか

239:デフォルトの名無しさん
08/07/29 17:24:47
vistaでDelphi使いたいんだけど何入れればいいのん？
3.1って使える？

240:デフォルトの名無しさん
08/07/29 20:23:47
入れればいいのん？って聞かれればDelphi2007
D5も動いてるけどね
3.1は入れたことがない

241:デフォルトの名無しさん
08/07/29 20:44:21
2006はそのままではインストールできなかった。

242:デフォルトの名無しさん
08/07/29 23:52:38
ただ線を引くだけ、というクラスを作りたいんだけど、どこから継承すればいいの？　Tshapeじゃもったいないし。

243:238
08/07/29 23:56:51
>>237
うわぁ・・・Form1.KeyPreviewの中・・すごくFalseだったナリ・・・

244:デフォルトの名無しさん
08/07/30 00:11:04
>242
TShapeでいいのでは？それかTGraphicControlからTShapeを参考に必要な部分だけ
実装するか。

245:デフォルトの名無しさん
08/07/30 01:27:41
>>243
せめて移したコードのトレースしてれば、すぐにわかるだろそんなことｗ

246:デフォルトの名無しさん
08/07/30 02:11:55
>>232
TObject

247: ◆XcB18Bks.Y
08/07/30 20:58:46
>>242
TGraphicControlでいいと思います。
基本的にPaintメソッドに線を引くコードを書くだけですから
とりあえず動くものはぐに出来てしまうと思いますよ。


248:デフォルトの名無しさん
08/07/30 21:14:16
Delphiというか、標準PASCALで

readln(a);
assign(f, a);

というふうにやっているんですが、
自分の家のコンパイラだと通るんですが、
他のコンパイラでもこの描き方でおｋですか？

aはchar型のpacked arrayです

249:デフォルトの名無しさん
08/07/30 22:53:05
Indy9とIndy10入れるとしたらどっちがいいですか？
オプソのもの時々参考にしたり弄ったりする時があるけどIndy9ばっかなのでIndy9かな・・・

250:デフォルトの名無しさん
08/07/30 23:01:14
Delphiのバージョンにもよるけど、基本Indy10で、問題があることがわかってる機能を使うならIndy9、じゃないのかな。

251:242
08/07/30 23:44:34
解答さんくすです

>>244
>>必要な部分だけ実装
そんな高等技術まだないっす。

>>247
>>TGraphicControlでいいと

すっげー百済ねぇ質問だけど、あまり上位のオブジェクトを使うと、必要のない無駄な機能まで継承してしまって非効率って事はないの？
実際必要なのはプロパティでは始点・終点の座標と、任意に付与した線の名前と、線の色と太さくらい持ってれば十分なんだけど。
あとメソッドでは線を引く、線を消す、線を隠す、ShowHint、イベントハンドラはOnMouseMoveとOnClickくらいかな。

252:デフォルトの名無しさん
08/07/31 00:00:37
> >>244
> >>必要な部分だけ実装
> そんな高等技術まだないっす。

じゃ素直にTShapeから派生しとけ。

253:デフォルトの名無しさん
08/07/31 00:18:55
>>250
うーん、悩むとこですね
周りで使われてるのはIndy9ばっかなのでIndy10使うことになったら入れなおしでいいか・・・

254:デフォルトの名無しさん
08/07/31 00:55:55
>>251
VCLのソース読んでみな。TShape コントロールは TGraphicControl に
毛が生えたものでしかないことが分かるから。

255:デフォルトの名無しさん
08/07/31 10:06:38
久々に Windows アプリ書くんで、どうせなら新しめの Delphi 使おうと
『Codegear て何？』とか、『なんでBorland ドメインじゃないん？』と思いつつ TurboDelphi 落とした。

『そんな API 呼ぶなよ』とか警告出るけど、Delphi3.1 で書いたコードも通って一安心なんだけど、
なんで IDE のウインドウサイズ記憶しないの？
起動するたんびに WUXGA 画面いっぱいに広がって困りますわorz
オプションとか見たけどそれらしき項目を見つけられず・・・自動保存の設定じゃないし。

今浦島なおじさんに教えてたもれ！


256:デフォルトの名無しさん
08/07/31 10:08:14
上の方にレイアウトの呼び出し、保存のボタンがある。
何通りでも好きなだけ記憶させると言いい。

257:デフォルトの名無しさん
08/07/31 10:09:30
ウィンドウを好きなように配置して
メニューの右上の方にDefaultLayoutみたいなドロップダウンリストがあるから
その右隣のボタンをクリックして保存

258:デフォルトの名無しさん
08/07/31 10:30:10
>>256 >>257
これは便利。
Classic Undocked で昔の別ウインドウ形式になるんだね。

そこら辺にマウスカーソル当てればわかることに即答ありがとう！


259:デフォルトの名無しさん
08/08/01 12:45:00
delphi7でwindows mobileのソフト作成ってできますか？

260:デフォルトの名無しさん
08/08/01 12:46:20
無理

261:デフォルトの名無しさん
08/08/01 14:53:13
叶姉妹

262:デフォルトの名無しさん
08/08/02 00:56:42
>>239
2007推奨。
旧バージョンは、VCLがVista環境下でいろいろと不都合がでてしまう。
VCL小細工しているせいかね。悲しいかな。

263:デフォルトの名無しさん
08/08/02 09:37:36
>>262
代表的な不都合をお願いします。
時期開発環境の参考にします。

264:デフォルトの名無しさん
08/08/02 10:18:10
ぐぐれよｗ

265:デフォルトの名無しさん
08/08/02 19:20:31
UNICODE非対応の今はどれでも同じ
Vistaで使いたいなら自分で工夫、妥協するしかない

266:デフォルトの名無しさん
08/08/03 00:22:58
UAC有効だと確認ダイアログが出まくってまともに使えない。
Aero有効にしているとスクロールバーが半分隠れて使いにくくなる。

267:デフォルトの名無しさん
08/08/03 01:44:46
結論としてはVista使ってる奴が悪い、になるんだろうな

268:デフォルトの名無しさん
08/08/03 01:59:56
Vistaが糞なんだろ

269:デフォルトの名無しさん
08/08/03 09:27:44
Vistaがクソとか平気でいう奴は、自分の置かれている立場(言語)がわかっているのかなあ？

270:デフォルトの名無しさん
08/08/03 09:45:41
死んだとか言われてるけど初心者の俺には何が死んだのかよく分からないし普通に使えるので別にどうということはない

271:デフォルトの名無しさん
08/08/03 12:02:01
recordを前方宣言出来るのでしょうか。
出来るのであれば、どうか方法を教えて頂けませんでしょうか。
出来ないのであれば、私を汚らしい言葉で責め立てて頂けませんでしょうか。

272:デフォルトの名無しさん
08/08/03 13:08:51
できないっぽいね。何をしたいのか具体的に書いてごらん？

273:sage
08/08/03 13:46:14
272様。
Builderのバグの
URLﾘﾝｸ(qc.codegear.com)
コレを回避出来ないものかとおいまして。

274:デフォルトの名無しさん
08/08/03 15:23:16
ふ〜む、難しいねぇ。つかOpenにしたまま放置かい。

275:デフォルトの名無しさん
08/08/03 15:43:23
都度hppを書き換える方法で行きます。


276:デフォルトの名無しさん
08/08/04 17:39:17
var
d, i: Integer;
begin
d := Windows.GetLogicalDrives();
for i := 0 to 32 do
if ((1 shl i) and d) <> 0 then Str.Add(Chr(i + Ord('A'))+':\');
end;

とやるのと

var
d: Integer;
c: Char;
begin
d := Windows.GetLogicalDrives();
for c := 'A' to 'Z' do
if ((1 shl (Ord(c) - 1)) and d) <> 0 then Str.Add(c + ':\');
end;
とやるのとじゃどっちが賢いんでしょうか

277:デフォルトの名無しさん
08/08/04 23:26:14
TWebBrowserのHttpヘッダを見たいんですが何かいい方法ありませんでしょうか

278:デフォルトの名無しさん
08/08/05 00:54:36
>276
下かな？でも上はそもそもバグっとる。for i := 0 to 25 doにしないと。

>277
つ WireShark

279:デフォルトの名無しさん
08/08/05 00:54:58
>>276
0 to 32 で 33個になるんだけど。
下の Ord(c) - 1 も、Ord(c) - Ord('A')じゃないの？

私は上の方が自然だと思います。
iが26以降になったときに何かやったほうがいいのかもしれません。


280:デフォルトの名無しさん
08/08/05 02:05:24
こんなのはどうだ。 d と c を分離するのはかえって解りづらいかな。
for c := 'A' to 'Z' do
begin
　if (d and 1) = 1 then Str.Add(c + ':\');
　d := d shr 1;
end;

281:276
08/08/05 02:30:36
こんなにレスありがとうございます

>>278
適当にググって適当にやったのがいけなかったかｗ
確かに25の間違いです

>>279
ご指摘の通りです
これからは見直しは1時間だな・・・

>>280
うーん、なんかすっきりしないですね

282:デフォルトの名無しさん
08/08/05 04:11:15
280に一票

283:デフォルトの名無しさん
08/08/05 08:07:05
with BitArray(GetLogicalDrives) do with Each do while Loop do
　　Str.Add(Char_Add('A', It.Value) + ':\');

欠点はうちの環境でしか動かないことだがｗ

284:277
08/08/05 09:22:39
>>278
ああいや、外部からではなくDelphi内でモニタできないものかなあと思いまして、
Headerプロパティのようなものが見当たらず、代替するにも見当がつかなかったので聞いてみたのですが、
もしやindy経由で手の込んだことしないといけないんでしょうか…

285:デフォルトの名無しさん
08/08/05 15:46:47
>>284
ここにあった
URLﾘﾝｸ(blog.goo.ne.jp)

286:デフォルトの名無しさん
08/08/05 22:34:59
nkf32.dllやjconvertなりで文字コード自動検出してエンコードするソフトを作っているんですが、ほぼ英字のテキストだとたまに自動検出に失敗します。
失敗するのはいいんですが、失敗して文字化けした文字を検出するにはどうすればいいんでしょうか？

EmEditorの自動検出でもよく失敗するのですが、そういうとき開くと「指定したエンコードで変換できない文字が含まれています。編集を続行して保存するとファイルの中身が破壊されます。 」と出るので検出は出来ると思うんですが、どうやったらいいのか見当もつきません・・・

287:デフォルトの名無しさん
08/08/05 22:48:40
全文スキャンするしかないんじゃない？
文字コード検出のってファイル先頭部分しか見てないんじゃないかな

288:デフォルトの名無しさん
08/08/06 00:09:51
(c)文字は変換できないんじゃないの？

289:286
08/08/06 00:30:02
自動検出で全文してみたんですけど無理みたい（失敗）です。。
EmEditorで検出失敗してもエラーが出ないときがあるので難しいのかもしれません。
けど、失敗エンコードのままの文をFireBird2.1DBのテーブルにインサートしてその文をクエリで検索するとエラーが今のとこ確実に出ます・・・
2.0ではエラーはでずクエリできるので、2.0を使うしかないみたいです、自分の今の力では。。

（ｃ）って著作権のマークのやつでしょうか

290:デフォルトの名無しさん
08/08/06 00:48:34
自前変換ならエンコする時に全文字見る訳で
その時に検出するだけでしょ
WideCharToMultiByteとかならlpUsedDefaultCharで検出できるかと

291:デフォルトの名無しさん
08/08/06 11:12:20
>>285
うーん、headタグの取得については記述がありますが、
httpヘッダに関しては書いてないみたいです

TWebResponseとかあるのにTWebBrowserでは使えないんてくやしいっ
大人しくTcpServer経由しますか…

292:286
08/08/06 11:54:16
>>290
なるほど、エンコ時にやればいいのか
ありがとうございます！


293:デフォルトの名無しさん
08/08/06 16:38:17
というかぁ、完璧な自動って不可能だからぁ。
文字コードが重なっていて、自動判断できない領域があるしぃ。


294:デフォルトの名無しさん
08/08/06 18:57:59
その文書作った人がそうだといったらどう見ても違う文字コードでもその文字コードになっちゃうだろうしなあ

295:デフォルトの名無しさん
08/08/08 16:12:21
指定のビットが0か1かを判定する関数またはクラスの作成をよろしくお願いします。
入力するデータはビット番号とデータなのですが、元のデータのサイズが決まっていなくて、
32ビットデータ4個(ビット0-127)だったり2個(ビット0-63)だったと可変です。

296:デフォルトの名無しさん
08/08/08 16:18:29
そこまで速度にこだわってないので、関数でいいのかな。
function TestBit(BitNum: Integer; Data: array ): Integer;
Data引数が可変引数だったりするとうれしいです。以上よろしくお願いします。




297:デフォルトの名無しさん
08/08/08 16:20:22
ああ、32ビットと固定長でないかもしれません。16ビットや8ビットの場合もあるかもです。



298:デフォルトの名無しさん
08/08/08 16:21:58
ここは丸投げスレではありません
お引き取りください

299:デフォルトの名無しさん
08/08/08 16:23:47
>>298
今日は暑いですが、よろしくお願いします。

300:デフォルトの名無しさん
08/08/08 16:25:33
>>299
本当に暑いですね
クーラーつけなきゃやってらんないです


お引き取りください

301:デフォルトの名無しさん
08/08/08 16:30:44
>>300
そんな寂しい事を言って私を涼しくしなくてもいいので、TestBitの中身の方をお願いします。


302:デフォルトの名無しさん
08/08/08 16:44:51
解決しました。
function TestBit(Stream: TStream; BitNum: Integer): Integer;
var
B: Byte;
OldPosition: Int64;
begin
OldPosition := Stream.Position;
try
if (BitNum < 0) or (BitNum > Stream.Size*8) then
raise Exception.Create('error');

Stream.Position := BitNum div 8;

Stream.ReadBuffer(B, SizeOf(B));

Result := (B shr (BitNum mod 8)) and 1;
finally
Stream.Position := OldPosition;
end;
end;
でいくことにしました。アドバイスありがとうございました。


303:デフォルトの名無しさん
08/08/08 17:37:35
>>302
どういたしまして、お役に立てて光栄です。

304:デフォルトの名無しさん
08/08/09 02:42:51
ゼロサプレスって言うんだっけ。桁数指定して、桁数に満たない場合は頭に０を埋めてくれるヤツ。
formatでできるかと思ったらできないんだね？
どうすればいいのか教えて？　まさか自作関数？

305:デフォルトの名無しさん
08/08/09 08:53:26
マニュアルのformat関数のところにちゃんと書いてあるよ

306:デフォルトの名無しさん
08/08/09 09:13:41
え？　実数の場合は%8.3fとかでいいんだけど（あと通過型も）　整数の方法がわからないよ

%05dとかにすると、スペースになってしまう。

307:デフォルトの名無しさん
08/08/09 09:17:56
delphi format %05d
でぐぐってみｗ

308:デフォルトの名無しさん
08/08/09 10:04:36
どーでもいいがゼロサプレスの逆だろ
ちなみに指定桁数を0で埋めるって何ていうんでしょう？

309:デフォルトの名無しさん
08/08/09 10:11:59
URLﾘﾝｸ(www.wdic.org)

310:デフォルトの名無しさん
08/08/09 11:12:28
ゼロパディングなんだ。
パケットとかではパディングってよく使うけど、桁合わせの時には聞いたことがないような。

311:デフォルトの名無しさん
08/08/09 18:28:40
ListView がスクロールされた事を知らせるイベントってないですか？
あるいは、enable が true でスクロールバーをスライド出来なくする方法ありますか？

312:デフォルトの名無しさん
08/08/09 18:48:21
スクロールしないならLabel並べておけ

313:デフォルトの名無しさん
08/08/09 19:01:47
ListViewはウィンドウコントロールだから、
普通に WM_VSCROLL　で出来ないか？
WndProc書き換えちゃえ。

314:311
08/08/09 19:14:03
>>312
ListView をクリックすると、そのセル上に同じ大きさで memo を表示して
あたかも編集出来る様にしたんですけど、スクロールすると ListView だけ動いて
memo は置いてけぼりになるんです、だから編集中はスクロール出来ない様にするか
スクロールしたら、なんとか memo が付いて行く様にしたいと思ったんです。

>>313
やったこと無いですけど、何とか出来るか試してみたいと思います、有難うございましたｗ

315:デフォルトの名無しさん
08/08/09 20:04:36
>>314
Memo使うの？
Editでならやったことあるけど、今はStringGrid使ってるよ

316:311
08/08/09 20:50:14
>>315
なんか memo が使いやすかったのでｗ

＞Editでならやったことあるけど
その時スクロールとか困らなかったですか？

317:デフォルトの名無しさん
08/08/09 22:50:12
>>316
入力後Enterキーを押したらEditが消えるようにした気がする
すぐにStringGridに変えたからよく覚えてない

318:311
08/08/09 23:04:01
>>317
そうですか、じゃあ自分もそうしようかなと思います、有難うございましたｗ

319:デフォルトの名無しさん
08/08/10 11:39:07
つーか、項目選択したらエディットコントロールを上掛け、
スクロールかEnter感知したらエディット消してListViewに反映でいいんじゃないの？
StringGridはドロップダウンリストとか使えないからなぁ‥‥

320:311
08/08/10 11:46:16
>>319
そうしたいんです、でもスクロールを感知できなくて困ってるんです
Enter感知は出来るけどｗ

321:デフォルトの名無しさん
08/08/10 12:02:43
>>320
ならWndProcメソッドのオーバーライドがんばれ。
正規の方法でのコンポの継承が面倒なときは↓の方法使うと楽
URLﾘﾝｸ(www.geocities.jp)

322:デフォルトの名無しさん
08/08/10 12:19:11
なんか、最近Delphiのパンフが送られてこない気がするのですが、
次期バージョンの日本語版発売っていつごろになるんでしょうか？

今、BDS2006使いなのだけどもVistaにきちんと対応したい。
2007って今買い時かなのかな・・・？

次期バージョンはどうせ、VCLのUNICODE対応でバグ満載になるだろうし
安いうちに買っておけばよかたとちょっと後悔している

323:デフォルトの名無しさん
08/08/10 12:19:51
>>321
既出なのかもしれないけど、よいTipsですね。

324:311
08/08/10 12:21:07
>>321
やっぱりその方法しかないですかｗ
なんとか頑張ってやってみます、有難うございました。

325:デフォルトの名無しさん
08/08/10 12:23:02
そんな低レベルなところでがんばっても
.NETに移ったら全部ゴミになっちゃうからやめておいた方がいいよ。
今のうちにC#を学んでいつでも移行できるように準備しておいた方が後々特。

326:デフォルトの名無しさん
08/08/10 12:35:12
>>324
WindowProc差し替えの方が簡単かも。

327:311
08/08/10 13:01:27
>>325
.NET も良さそうですね、便利そうで羨ましいですｗ

>>326
その方が簡単ですか、その方法も調べて見たいと思いますｗ

どうしても解からなかったら邪道だけどタイマーで監視します。
みなさん有難う御座いましたｗ

328:311
08/08/10 15:13:17
なんとか
WindowProc の WM_VSCROLL で出来ました
有難う御座いましたｗ

329:デフォルトの名無しさん
08/08/10 20:19:38
memo1.lines.loadfromfile(****.txt);
でメモラインに追加してから

memo1.lines.loadfromfile(***2.txt);
のテキストを↓に追加したいのですが、上書きされて***2.txtのデータしか残りません・・・・
上書きせずに追加するにはどうすればいいのでしょうか？

330:デフォルトの名無しさん
08/08/10 20:53:51
add?

331: ◆XcB18Bks.Y
08/08/10 21:15:41
>>329
編集中のテキストにファイルから別のテキストを追加読み込みしたいということですね。
別に文字列リストを用意してそれに読み込んでからMemo1.Linesに追加。

procedure TForm1.Action_AddFromFileExecute(Sender: TObject);
var
　Strings: TStringList;
begin
　Strings := TStringList.Create;
　try
　　if OpenDialog1.Execute then
　　begin
　　　//　文字列リストにファイルを読み込む．
　　　Strings.LoadFromFile(OpenDialog1.FileName);
　　　//　Memo1のテキストにこの内容を追加．
　　　Memo1.Lines.AddStrings(Strings);
　　end;
　finally
　　Strings.Free;
　end;
end;


332:デフォルトの名無しさん
08/08/11 07:32:07
ClientDataSetに大量のデータ突っ込んだ後、EmptyDataSetでクリアしても、
タスクマネージャのメモリ使用量が変わらないんだけど、これは？？
データ突っ込んで、タスクマネージャで100MB近くなったんだけど、ずっとそのまま・・


333:デフォルトの名無しさん
08/08/11 18:05:35
TurboDelphiを先日落とした身です。

例えば

procedure TForm1.Button2Click(Sender: TObject);
var
hoge: string;
begin

end;

でF9実行しようとすると、その変数は使われてないと警告が出てデバッグが実行できません。
警告を残したままデバッグの実行はできないものなのでしょうか。

334:デフォルトの名無しさん
08/08/11 18:08:42
{$WARN SYMBOL_DEPRECATED OFF}
みたいなのを頭に書いとけば消せる。
具体的な指定はヘルプにあるはず。
その警告は残しておいた方がいいとは思うが。

335:デフォルトの名無しさん
08/08/11 19:24:36
Delphiでのアプリケーション間通信のよい方法があったら教えてください。

環境は双方ともDelphi製で、片方VCL GUIアプリ、片方Win32アプリです。

実際にはマップエディタで設定したマップを、別アプリのゲーム側で
リアルタイムに読み込んでプレビュー処理をしたいのです。
そこで、マップエディタで現在編集中のマップをファイルで保存しておいて、
そのファイル名（もしくはマップのIDなり）をゲーム側に伝えたいのです。

336:デフォルトの名無しさん
08/08/11 19:38:34
ファイル名程度ならWM_COPYDATAで十分じゃ？

337:デフォルトの名無しさん
08/08/11 19:39:06
ファイル名程度なら、WM_COPYDATAで十分じゃ？

338:デフォルトの名無しさん
08/08/11 19:40:24
Delphiでのアプリケーション間通信のよい方法があったら教えてください。

環境は双方ともDelphi製で、片方VCL GUIアプリ、片方Win32アプリです。

実際にはマップエディタで設定したマップを、別アプリのゲーム側で
リアルタイムに読み込んでプレビュー処理をしたいのです。
そこで、マップエディタで現在編集中のマップをファイルで保存しておいて、
そのファイル名（もしくはマップのIDなり）をゲーム側に伝えたいのです。

339:デフォルトの名無しさん
08/08/11 19:45:33
SendMessage(WM_COPYDATA でマップデータを送るのはどうか。
使ったこと無いけど、SendMessageTimeout の方がいいのかもしれない。
受け取り側でデータをコピーするから、マップデータが巨大だと
時間がかかる。

340:デフォルトの名無しさん
08/08/11 22:10:29
普通に考えればメモリマップドファイルだろうね。

341:デフォルトの名無しさん
08/08/11 22:11:12
>>339-340
ありがとうございます。WM_COPYDATAが簡単にできそうです。

こちらが参考になりました。

WM_COPYDATA
メッセージによるプロセス間通信
URLﾘﾝｸ(homepage2.nifty.com)

342:デフォルトの名無しさん
08/08/12 00:09:05
警告ならできるだろ >333
原因は別にある

343:デフォルトの名無しさん
08/08/12 00:55:49
変更のあるたびに全部送るんじゃなくて、変更のあったところのみ送れば
速くなりそうですね。

344:デフォルトの名無しさん
08/08/12 13:06:48
>>334>>342
新規でプロジェクト作成してみたら警告が出るようなコードでもデバッグが実行できました。

どうもお騒がせしましたorz

345:デフォルトの名無しさん
08/08/12 20:09:22
>>331
遅くなりましたが、ありがとうございます！
おかげでできました〜

346:デフォルトの名無しさん
08/08/13 19:18:29
TMenuItemからTMenuItemに全てのプロパティをコピーするにはどうすればいいんでしょうか
Assignでは「TMenuItem から TMenuItem に代入することはできません.」と例外が発生しました

347:346
08/08/13 20:30:24
自己解決しました
URLﾘﾝｸ(delfusa.main.jp)
このCopyComponentを使えば出来ました

348:346
08/08/13 20:57:39
と思ったけど完全にはコピー出来ないようです
何とかコピー出来ないものでしょうか

349:デフォルトの名無しさん
08/08/13 21:01:06
TStream.WriteComponent/ReadComponentしてみたら。
それかメニュー構造を再帰的にコピーしていくコード書くか。

350:346
08/08/13 22:33:53
>>349
> TStream.WriteComponent/ReadComponentしてみたら。
例外が発生し、動きませんでした

> それかメニュー構造を再帰的にコピーしていくコード書くか。
適当に書いたら普通に出来てしまいましたｗ

ありがとうございました

351:デフォルトの名無しさん
08/08/14 00:24:35
以前からこのスレを拝見しておりました
いきなりの質問ですみませんがお答えいただけたら幸いです
var
str: array of array of String
i : Integer;
List: TList;
begin
SetLength(str,10);
for i:=0 to 9 do
begin
SetLength(str[i],10)
end; //str[0,0]からstr[9,9]まで領域を作る

List:= TList.create;

としたとき、
TListにstring型の１時配列を格納したいと思い、
List.add(str[Idx])
としたのですが、その後ListからItemsプロパティによって中身にアクセスできないんです・・・どうしたらよろしいのでしょうか？


352:デフォルトの名無しさん
08/08/14 01:42:22
>>351
usesにTypesを追加します。
TStringDynArray(List[x])[y] で str[x, y] にアクセスできます。

353:デフォルトの名無しさん
08/08/14 23:26:38
>>352
お答えありがとうごさいました！とても助かりました。

354:322
08/08/15 20:04:40
Delphi2007Pro版アップグレードの価格比較をみつけたので、こちらで吟味することにします。

ボーランド/Borland Borland Delphi 2007 for Win32 Professional R2 アップグレード版 価格比較 [coneco.net]
URLﾘﾝｸ(www.coneco.net)

amazonとかだと50000円超えててびくりしました
お騒がせしました。
ありがとうございました。

355:デフォルトの名無しさん
08/08/15 20:51:48
直販でUGすれば３１５００円だろ。
直販のUGってもう終了したんかな。


356:デフォルトの名無しさん
08/08/15 21:50:23
電話してお姉さんに丁寧に説明してもらいなさい。

357:デフォルトの名無しさん
08/08/15 23:04:26
おねいさんに手取り足取り教えてもらいたい。


358:デフォルトの名無しさん
08/08/16 00:16:26
おねいさんに手コキ足コキしてもらいたい。

359:322
08/08/16 06:40:01
>>355
もう直販やってない希ガスCodeGearのページいってもたらいまわしにされる

360:322
08/08/16 07:06:51
製品の購入のページってこれですよねえ。
URLﾘﾝｸ(www.codegear.com)

> バージョンアップ版を購入の方
> 以下のCodeGear製品については、バージョンアップ版も、新規購入と同様に、ソフトウェア流通代理店各社、SEshopのCodeGear専門ショップなどのオンラインショップサイトよりお求めいただけます。
>
> CodeGear RAD Studio 2007
> Delphi 2007 for Win32 R2
> C++Builder 2007 R2
> JBuilder 2007
> 上記製品のバージョンアップ版の詳細については、こちらをご覧ください。その他の製品については、下記までお問い合わせください。

直販やってない？
たらいまわしは、商品詳細とかんちがいしてましたw
問い合わせてみるか・・・

それともTiburon待ったほうがいいのかなあ

361:デフォルトの名無しさん
08/08/16 08:49:32
Unicode が必須じゃなければ２００７にしとけ。
BDS2006持ってて2007買うのはどうかと思うがな。
お金持ちならだめもとでTiburonを。

362:デフォルトの名無しさん
08/08/16 08:54:10
こういう業界じゃ、バージョンアップの3万なんて日給分程度だろ？
お金持ちって・・。


363:デフォルトの名無しさん
08/08/16 09:18:41
ＩＴ土方をなめるなよ。
ピンハネされまくって、ひ孫受けの土方に渡る金は、元金の１／３以下


364:デフォルトの名無しさん
08/08/16 09:31:53
Delphiできる人少ないから、手が足りない。
バイトで内職してくれる人おらん？

365:デフォルトの名無しさん
08/08/16 09:33:29
思いっきり丸投げしといて
「内規で２割引かないといけないんですよてへへー」が
２つ３つ挟まるとか平気であるしなｗ

366:デフォルトの名無しさん
08/08/16 09:34:58
3割引かれてﾃﾍﾍｰだけど、1社しか挟まってないからまだ楽だ。

367:デフォルトの名無しさん
08/08/16 09:36:28
他所でやれ


368:デフォルトの名無しさん
08/08/16 10:09:56
スキルが高まれば高まるほど逃げ出す、それが日本のIT業界。

369:デフォルトの名無しさん
08/08/16 13:10:00
>360
だからとりあえず電話してみなさいって。連絡先は
URLﾘﾝｸ(www.codegear.com)
ここね。ただアップグレード期間は終わってるような気がするので通常の購入になって
高いかもしれないけど、そしたら他のところで買うことを考えてみればいいだけの話。

>366
3割ってよっぽど舐められてるか893か、いずれにしろろくでもないところだと思う。

370:デフォルトの名無しさん
08/08/16 13:25:53
スキルの低い底辺クズがいる、それがIT業界。

371:デフォルトの名無しさん
08/08/16 13:40:40
>>338-339 へぇ、メッセージで投げられるんだ
普通はアプリの通信ってパイプ使うけど
マップデータ自体を送るんじゃなくてファイル名って言ったよね　たった数文字送るなら
パイプ通信のほうがいいんじゃないの

372:デフォルトの名無しさん
08/08/16 13:40:50
Form1からForm2へドラッグ＆ドロップするにはどうすればいいんでしょうか？

373:322
08/08/16 15:41:26
>>369
電話してみます。

みなさんありがとう。

374:デフォルトの名無しさん
08/08/16 15:57:45
>>372
OnDragOverイベントでAccept設定して出来ないか？

375:デフォルトの名無しさん
08/08/16 18:00:12
>>371 受け取る方はパイプのデータが更新されたことをどうやって知るの？

376:デフォルトの名無しさん
08/08/16 20:41:12
数文字程度でもWM_COPYDATAの方が簡単かもしれない。

377:デフォルトの名無しさん
08/08/16 21:18:38
自前のTMyFormの機能としてWM_COPYDATAをラップして
識別用のDWORD一つとデータ本体を送受信できるようにしておくといろいろ便利。

378:デフォルトの名無しさん
08/08/16 23:16:21
現在Delphi2007を使用しています。

デバッグ機能について教えていただきたいのですが
Visual Studioでいうところの「次のステートメントの設定」は
Delphiに存在しないのでしょうか。

無いととても不便な気がするのですが
どうしても見つかりません。

379:デフォルトの名無しさん
08/08/16 23:30:13
ない。なくても別にそれほど不便じゃないし。
QCに登録したら次の次で採用されるかも。

380:デフォルトの名無しさん
08/08/16 23:45:05
>>379
即レスありがとうございます。探し回っていたのですが
これ以上探さずにすみます。それにしても残念。

381:デフォルトの名無しさん
08/08/17 03:40:24
>>372
VCL標準のD&D機構では出来ないから、
MouseCaptureして自分でやる。

382:372
08/08/17 10:49:16
>>374
>>381

レスありがとうございます。
MouseCaptureググッって、午後からいろいろ試してみようと思います。

383:デフォルトの名無しさん
08/08/17 11:13:40
TFormのDnD、VCLでできないんならOLEDnDのほうがスマートじゃ？
プロセス間でも平気だし、テキストや画像なら未知のアプリケーション間でも出来るし

384:デフォルトの名無しさん
08/08/17 11:30:37
フォーム上にカラーパレットのようなものを配置(カラーグリッドでいいのかな)
お絵描きコントロールを配置(たぶんペイントボックス)


ペイントボックスに、既存のbmpファイルを読み込む(←ここがすでにわからない)

カラーパレットをクリック
で、色を選択

ペイントボックスに読み込まれた絵のどこか適当な場所をクリック

その「クリックした個所と同じ色が」選択した色に塗りつぶされる
(MSペイントの塗りつぶしみたいな感じ。あれは別な色で囲まれちゃってる部分は無視されるけど、
そこもぶち破って塗りつぶしてくれるならなおよろし。あれと同じでも充分)

顰蹙非難罵詈雑言何もかも覚悟でおねがい

以上を実現するコードください
まるごとください
おねがいします

385:デフォルトの名無しさん
08/08/17 11:34:30
どっかでペイントソフト作るチュートリアル無かったか。
丸投げするなら金額も一緒に書いとけよ。

386:デフォルトの名無しさん
08/08/17 11:38:11
大人しくTPaintBox使わずにTImage使えば？

387:デフォルトの名無しさん
08/08/17 11:47:07
， 　　，:‘. 　　　　　　　　　。　　　　　　　　　　　　　+　　 ，..
　’‘ 　　　　+　　 ，.. 　　　　　　. ..; '， 　　，:‘
　　　　　　. .; : ’　　　　　　　　　　　　　　　　　　　　　　　　　　 '　，:‘.
　　　　　　　　　　 あ　あ　　　　　　　　　　　　　，:‘. 　　　　　+
.. '　，:‘. 　　　　　　　　　　　　　　　　　　　　　　　　　　　　. ...::　’‘
’‘ 　　　　.;　　　 こ　ん　な　に　お　断　り　し　た　い
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　。
.　　　　　。　　　気　持　ち　に　な　っ　た　の　は　　　，:‘. 。
　'+。
　　　　　　　　　　　　　　　　初　め　て　で　す　　　　　　　　　　.. '　，:‘.
:: . .. 　　　　　　　　　　　　　　　　　　　　　　　　　　　.. '　，:‘.
　　　　　　ﾊ,,ﾊ
　　　　　( ﾟωﾟ )

388:デフォルトの名無しさん
08/08/17 11:48:25
　 /＼＿＿_／＼
／　／　　 　ヽ ::: ＼
|　（●）,　、（●）、　|
|　　,,ノ(、_, )ヽ、,, 　 |
|　　　,;‐＝‐ヽ 　 .:::::|
＼　　｀ニニ´　 .:::／　　　　　　NO THANK YOU 　
／｀ー‐--‐‐―´´＼
　 　　　　 .ｎ:n　　　 ｎｎ
　 　 　　nf|｜| 　　　| | |^!n
　 　 　　ｆ|.| | ∩　　∩|..| |.|
　 　 　　|: ::　 ! }　　{！ ::: :|
　 　　　 ヽ　　,イ 　　ヽ　 :イ


389:デフォルトの名無しさん
08/08/17 12:12:59
　　　　　　　　　　　　お断りします
　　　　　　ﾊ,,ﾊ　ﾊ,,ﾊ　ﾊ,,ﾊ　ﾊ,,ﾊ
　　　　　（ ﾟωﾟ ）ﾟωﾟ ）ﾟωﾟ ）ﾟωﾟ ）　　お断りします
　　　　／　　 　＼　　＼　　＼　　＼　 　　お断りします
　 ((⊂ 　） 　 ﾉ＼つﾉ＼つﾉ＼つﾉ＼つ)) 　　お断りします
　　　　　（＿⌒ヽ　⌒ヽ　⌒ヽ　⌒ヽ　　　　　　　お断りします
　　　　　　ヽ　ﾍ　}　ﾍ　} 　ﾍ　}　ﾍ　}
　 ε≡Ξ　ﾉノ ｀Jノ ｀J ノ ｀J ノ ｀J


390:デフォルトの名無しさん
08/08/17 15:47:38
再度おねがいにきました
あきらめないで待ってます

391:デフォルトの名無しさん
08/08/17 15:48:24
　　　　　　　　　　 ＿＿＿_ 　　 やなこったｗｗｗｗｗｗｗｗｗ
　 .ｎi 7　　　　　／⌒　　⌒＼
l^l | | ｌ ,/) 　 ／ （ ﾟ ） 　（。 ）＼　　　　 .ｎ 　　　
', U ! ﾚ' / ／ ::::::⌒（__人__）⌒:::::＼　　l^l.| | /） 　
/　　　 〈　| 　 　　 　ﾍ　 / 　 　　　| 　 | U ﾚ'/／)　　
　　　　　ヽっ　　 　　｀ ⌒´ 　 　／　　ﾉ　　　 ／　　
　／´￣￣　ノ　　　 　　　　　　 ＼ｒニ 　　　　|
　　　　　　　　　　　　　　　　　　　　　 `ヽ　　　l　


392:デフォルトの名無しさん
08/08/17 16:19:04
そんなことよりポインタ演算の話しようぜ。

393:デフォルトの名無しさん
08/08/17 22:17:46
もうちょっと待て。ベータブログに出てきてNDAから外れたらな。

394:デフォルトの名無しさん
08/08/17 22:19:01
>390
WindowsのPaint使えばいいんじゃね？

395:デフォルトの名無しさん
08/08/18 00:18:16
お絵かきソフトのサンプルをCDから探して。

396:デフォルトの名無しさん
08/08/18 11:40:11
その１
Image1.Picture.LoadFromFile('hoge.bmp');

以降よろしく。

397:デフォルトの名無しさん
08/08/18 11:58:30
canvas.FloodFill(なんたらかんたら)


398:デフォルトの名無しさん
08/08/18 19:12:39
DEMOSとかというフォルダからサンプルらしきものを発見しました
imageでも絵かけるんですね
>>396
>>397
ありがとうございます
ちょっと自力でがんばってみます

399:398
08/08/19 19:05:38
おかげさまでどうにか以下までは成功しました

procedure TForm1.Image1Click(Sender: TObject);
var
MouseP:TPoint;
MouseX:integer;
MouseY:integer;
GetColor:integer;
begin
GetCursorPos(MouseP);
MouseP:=Image1.ScreenToClient(MouseP);
MouseX:=MouseP.X;
MouseY:=MouseP.Y;
GetColor:=Image1.Canvas.Pixels[MouseX,MouseY];
Image1.Canvas.Brush.Color:=塗りつぶしたい色;
Image1.Canvas.FloodFill(MouseX,MouseY,GetColor,fsSurface);
end;

元のbmpファイルがけっこう小っちゃいので、Imageをめいっぱい大きくとったうえストレッチ表示にしたら
クリック位置を補正しなきゃならなくなってしまいました

MouseX:= Trunc(Image1.Picture.Bitmap.Width*MouseP.X/Image1.Width)

とか、とりあえずやってみたらできたけど、何かこのあたりはまだ考える余地がありそうです
あとちょっとだけがんばります




400:デフォルトの名無しさん
08/08/19 20:27:01
始めたばかりで頑張っていた頃を思い出させるいいレス。
頑張れ！

401:デフォルトの名無しさん
08/08/20 01:07:43
WideStringでのインデックスをAnsiStringでのインデックスに直すにはどうすればいいんでしょうか？
例えば
関数('あああ',3) = 5
みたいな感じです

402:デフォルトの名無しさん
08/08/20 01:25:08
>>401
こんな感じかな
function WideIndexToAnsiIndex(const ws: widestring; index: Integer): Integer;
begin
　　if (Index < 1) or (Index > Length(ws)) then
　　　　Result := 0
　　else
　　　　Result := Length(AnsiString(Copy(ws, 1, index - 1))) + 1
end;

403:デフォルトの名無しさん
08/08/20 01:36:25
>>402
うお、こんな簡単に出来ちゃうんですね
ありがとうございました

404:デフォルトの名無しさん
08/08/20 03:34:47
>>401
なぜユニコードだったりそれをMCBSに変換しなければならないかにもよるけど、
ByteToCharIndexやCharToByteIndexでもっと幸せになれるかもしれない。

405:デフォルトの名無しさん
08/08/20 12:47:33
Button1を押したら

Memo1の書いてる文章を
全て選択
コピー
切り取り
貼り付け

するにはどうやればいいでしょうか？

406:デフォルトの名無しさん
08/08/20 13:36:46
>>405
Memo1.SelectAll;
Clipboard.AsText:=Memo1.SelText;
Memo1.SelText:='';
Memo1.SelText:=Clipboard.AsText;


407:デフォルトの名無しさん
08/08/20 14:00:30
マジありがとうございます。
超助かります！

Memo1.SelectAll;
をしたら、ちゃんと全部選択できるてるみたいですが
選択範囲の色が変わりません。
普通のメモ張だったら
全て選択とかCTRL+Aで選択範囲が青くなりますよね？

青くするのはどうやるんですか？

408:デフォルトの名無しさん
08/08/20 14:17:29
>>407
Memo1.SelectAll;
Memo1.SetFocus;

409:デフォルトの名無しさん
08/08/20 14:24:01
あー。できました。
ありがとうございましたー。

410:デフォルトの名無しさん
08/08/20 20:57:20
SpeedButtonかToolButton使え

411:デフォルトの名無しさん
08/08/21 12:41:16
ファイルネームの最後だけ、たとえば
c:\AAA\BBB\CCC\asdf.html
というファイルなら
OpenDialogやFileListBoxのFileNameは
c:\AAA\BBB\CCC\asdf.htmlになってしまうので
Edit1.Text:=FileNameみたいにすると長くなっちゃうんだけど
c:\からCCCまでいらなくてasdf.htmlだけ取得するにはどうしたらいいんですか？

412:デフォルトの名無しさん
08/08/21 13:00:55
ExtractFileName

413:デフォルトの名無しさん
08/08/21 13:02:45
このくらい考えられないか？
FileName := 'c:\AAA\BBB\CCC\asdf.html';
while pos('\',FileName) > 0 do FileName := copy(FileName,pos('\',FileName)+1);
edit1.Text := FileName;


414:デフォルトの名無しさん
08/08/21 13:10:37
>>413
Pos2回もやってるのって無駄じゃね？
それに「ソ」とかのことも考えたほうがいいぜ
まあLastDelimiter使った方が楽だがｗｗ

415:デフォルトの名無しさん
08/08/21 14:53:29
役に立たないスレだな

416:デフォルトの名無しさん
08/08/21 15:46:36
412で答え出てるじゃん。

417:デフォルトの名無しさん
08/08/22 07:16:18
Delphiはchar型って変数じゃないんですか？


418:デフォルトの名無しさん
08/08/22 07:19:56
変数です。整数ではありませんが。

419:デフォルトの名無しさん
08/08/22 08:15:42
checklistbox1
にあるすべての項目にチェックを入れるボタンと
チェックをはずすボタンはどうやればいいんですか？
Seleckallやclearを押してもチェックがはずれたりしなくて困ってます。
ボタンクリック
begin
CheckListBox1.SelectAll;
end;
ってやってもなんも変わらないんですけど、どうすりゃいいですか？

420:デフォルトの名無しさん
08/08/22 08:55:17
>>419
まわしたら？

421:デフォルトの名無しさん
08/08/22 17:00:54
Button2をクリックしたら、Button1クリックと同じ処理をしたいときはどうやるの？
procedure TForm1.Button2click(sender:Tobject);
begin
Button1click(sender)
end;

とかやってもエラーがでてコンパイルできません。

422:デフォルトの名無しさん
08/08/22 17:13:13
>>421
それで間違ってないだろ。つかエラーメッセージくらい読めよ。

423:デフォルトの名無しさん
08/08/22 17:15:56
button1.onclick(sender);

424:デフォルトの名無しさん
08/08/22 17:34:25
Button2のイベントハンドラをButton1Clickに設定する

425:デフォルトの名無しさん
08/08/22 17:37:16
interfaceの宣言の下に書くGUIDはCtrl+Shift+Gで出る奴でいいんですか？

426: ◆XcB18Bks.Y
08/08/22 19:23:55
>>421
エラーメッセージはなんですか？

　未定義の識別子 Button1click

と出たなら Button1click という名前のメソッドがないということです。
（このメソッドがあるはずだ！ということなら似たような違う名前になっていないか調べてください）


427:デフォルトの名無しさん
08/08/22 21:20:55
俺俺っていうコードを変換したいんだけど
(俺のコードは89 B4です)
89 B4 89 B4をchrを使って
chr(89)+chr(B4)+chr(89)+chr(B4)ってやっても
ｴｴって出てきちゃいます。(半角のｴはB4)

どうやったら89 B4を「俺」になおせますか？
chr(46127)てやっても出来ませんでした。

数値を日本語に変えるやりかたを教えてください！

428:デフォルトの名無しさん
08/08/22 21:29:25
ShowMessage(chr($89)+chr($B4))
で普通に俺って出るぞ

429:デフォルトの名無しさん
08/08/22 21:37:50
なぁんだ、$をつければよかったんだ。
どうもありがとう

430:デフォルトの名無しさん
08/08/22 22:17:39
Chr(B4)でコンパイル通るのかｗｗ

431:デフォルトの名無しさん
08/08/22 22:32:41
ListviewのFullDragをtrueにしてドラッグで入れ替えても
見かけ上は入れ替わるんですけど、中身のデータはその場所と一致してないんですけど
ちゃんと一致させる方法ありますか？

432:431
08/08/22 22:35:26
すいませんカラムの並び替えです・・・

433:デフォルトの名無しさん
08/08/23 00:44:16
StringReplaceのWideString版ってありますか？

434:デフォルトの名無しさん
08/08/23 08:36:38
>>421
Button1.Click;

435:デフォルトの名無しさん
08/08/23 09:33:40
>>433
AnsiStringReplaceのことか？

436:デフォルトの名無しさん
08/08/23 14:31:08
Memo1.Linesのそれぞれの行の文字数(全角文字は二文字と数える)を取得するにはどうすればいいですか？
-------
最初
12345
あほ
apple
-------
ならメモ1の最初の行文字数=4
二行目=5
三行目=4
四行目=5
といった感じです！

437:デフォルトの名無しさん
08/08/23 14:34:12
>>436
普通にLength()でいいじゃん。

438:デフォルトの名無しさん
08/08/23 14:36:57
length

439:デフォルトの名無しさん
08/08/23 14:37:01
そんなコマンドがあったのか！ありがとうございます

440:431
08/08/23 19:21:21
>>431の問題ってデフォですか、それともウチだけの不具合ですか
それだけでも教えてください

441:デフォルトの名無しさん
08/08/23 19:32:19
>>435
それでも十分いけるんだけどいちいちWideString→Stringで置換→WideStringってやってるとなんか無駄っぽいので
WideStringのまま出来ないかなって思っただけです
TurboDelphiにWideStrUtilsってのがあったのでその中にある、
WideStringReplaceを使ってみたけどなんか不具合があるっぽくて正常に置換されなくて使えなかったんです
でもTntの関数使ったら出来ました
ありがとうございました

442:デフォルトの名無しさん
08/08/24 01:16:25
>>440
カラムのドラッグによる位置変更で
データそのものの位置が変わっちゃったらえらい事になるでしょうよ

ListView_GetColumnOrderArray
ListView_SetColumnOrderArray

辺りで幸せになれるかもね

443:デフォルトの名無しさん
08/08/24 02:23:50
TTrayIconを使用しているのですが、
TrayIconが表示されている状態でWindowsをシャットダウンすると、
「シェル通知アイコンが削除できません」
というエラーメッセージダイアログが発されて、正常にシャットダウンしません。
ダイアログを閉じるなりすれば、シャットダウンは進行するのですが。

アプリケーションでメッセージを補足して、WM_QUERYENDSESSIONを
受けたときに、TrayIconの表示をFalseにすれば何とかなるかと思ったのですが、
WM_QUERYENDSESSIONを受け取る以前に上記のエラーメッセージが
発されてしまっているようです。

対策をテストするにも、毎回Windowsをログアウトするなりしなければならないので、
非常に非効率的な事態に陥っています。

これらの問題をすでに解決済みの先哲がいらっしゃいましょうや。
なにとぞ愚人に叡智を授けて下されれば、この443、幸いに存じます。

444:デフォルトの名無しさん
08/08/24 05:30:02
SDK32: 通知領域にアイコンが登録されないことがある
URLﾘﾝｸ(support.microsoft.com)

445:デフォルトの名無しさん
08/08/24 05:45:16
どうも、443っす。
結局のところ、自己解決したっす。
原因は、WM_QUERYENDSESSIONを補足しきれてなかったことみたいっす。
WM_QUERYENDSESSIONをちゃんと補足したときにTrayIconを非表示にするだけで何とかなったっす。
つまり、アプローチは間違って無かったっす。
汗顔のイタリーっす。板汚し、失礼したっす。
それじゃ、天上の調べをオリーブの枝に接ぐ作業に戻るっす。
チャオっす。

446:431
08/08/24 06:30:05
>>442
ありがとうございました

447:デフォルトの名無しさん
08/08/26 14:13:11
Excelで管理していたToDoのメモを使いやすくしたいと思い、
愛用のDelphiでDB化できないかと思っています。

可搬性を考え、Delphiの通常のアプリ同様インストールなしでDBを使いたいのですが、
なにかよいエンジンは何かないでしょうか？
手持ちの最新版は Delphi2006です。

448:デフォルトの名無しさん
08/08/26 15:21:06
EmbeddedFirebirdとか
インタフェースはInterbaseそのままだからIBXとかも普通に使える。ただしDLLなので、動作時のカレントディレクトリに注意。

449:デフォルトの名無しさん
08/08/26 15:33:36
プロパティを絶対に変更しないって前提なら
TTodoItem = class
published
にいろいろデータ溜め込んでTStream.WriteComponent, ReadComonentすればいいんだけど
リスク高すぎなんだよな。
ここら辺もうちょっと柔軟にXMLに対して読み書きしてくれるライブラリはないものか。

450:デフォルトの名無しさん
08/08/26 16:05:15
>>447
SQLiteが一番手軽かと

451:デフォルトの名無しさん
08/08/26 16:15:53
>>448-450
ありがとうございます。
Embedded Firebird(Interbase6互換)、Write(Read)Component、SQLite などですね。

あと、MyBaseも使えるようです。こちらが参考になりました。
Delphi@WCIMH
URLﾘﾝｸ(hp.vector.co.jp)

SQLiteはビジュアルコンポーネントと連携できるのでしょうか？

---

次ページ

最新レス表示

スレッドの検索

類似スレ一覧

話題のニュース

おまかせリスト

▼オプションを表示

レスジャンプ

mixiチェック！

Twitterに投稿

オプション

しおりを挟む

スレッドに書込

スレッドの一覧

暇つぶし2ch

---

4254日前に更新/177 KB
担当:undef