C Builder相談室 Part3
■ このスレッドは過去ログ倉庫に格納されています
0001デフォルトの名無しさん
NGNG過去スレ・関連サイトは>>2-5あたり。
0039( '｡')
NGNG>>38
良いと思いますよ。
要らなくなったコンポーネントは deleteで
破棄してしまってOKです。
後処理なんかもデストラクタでしてくれます。
0040( '｡')
NGNGですのでやはり delete PageControl->ActivePage で良いんじゃないでしょうか。
0041デフォルトの名無しさん
NGNGスーパーハイソサエイティーハッカーのY.K氏の許可を得ているのですか？
age
age
0042TabSheetについて
NGNGありがとうございました。安心して眠れます。＾−＾
0043デフォルトの名無しさん
NGNGで、
DirectoryExists(hoge)が、
プロジェクト＞オプション にて、
「実行時パッケージを使って構築」のチェックを外して、メイクするとリンクエラーになります。
外部ライブラリを参照しない、単独exeにしたいんだけど、どうしたらいいですか？
0044デフォルトの名無しさん
NGNGほんとだリンカエラー出るね。
合ってるか分からんけど *.bpr 開いて
<LIBRARIES value="Vcl50.lib vclx50.lib"/>
<SPARELIBS value="Vcl50.lib vclx50.lib"/>
って変更してみ。一応リンカエラーでなくなった。
0046_
NGNG効かなくなるのですが、どうすればいいでしょうか？
0047デフォルトの名無しさん
NGNGとか、スレッド使うとか。
0048_
NGNGありがとうございます^^;
0049デフォルトの名無しさん
NGNGそれやると、やっぱり処理速度って落ちるよね。
ループとかしている方のメイン処理の。
Application->ProcessMessage()を入れないと
CPU100%使い切ってるのに、入れてやると
多くても70or80%くらいなんだよねぇ。
if(loopCount % 100 == 0) {
Application->ProcessMessage();
}
とかやるべきかねぇ？
0050デフォルトの名無しさん
NGNGじゃあスレッドで。
0051デフォルトの名無しさん
NGNG005249
NGNGやっぱ、パフォーマンス求めるならそうなるよね。
１度だけ、見よう見まねでスレッド使ったことがあるけど、
なんだか使いづらかった。
こんな程度の腐れは逝って良しですね。。。。
0053デフォルトの名無しさん
NGNGApplication->ProcessMessage();
}
は良く使う手だよ。
プログレスバーの操作もその中にブッチこむよ。
0054デフォルトの名無しさん
NGNGメールアドレスとか名前とか取られるのがやなんだけど。
0055デフォルトの名無しさん
NGNG0056デフォルトの名無しさん
NGNG0057デフォルトの名無しさん
NGNG外部のエディタでソースを保存してBuilderに戻ると、
--------------------------------------------------
モジュールXXXXXXXのタイムスタンプが変更されました。
読み込みなおしますか？
--------------------------------------------------
と確認のダイアログが出るのですが、このメッセージを出さないようにする方法はありますか？
自動的に読み込みなおすようにしたいのです。
0058デフォルトの名無しさん
NGNGはないでしょうか？
Canvas->Pixels[x][y]=TColor;のループだと非常に遅い感じです。
0059デフォルトの名無しさん
NGNGScanLine使え
0060デフォルトの名無しさん
NGNGTMemoコンポーネントを使ってるんですが、
Lines->Add(ホゲホゲ)って文字列を追加していくと、
最後の改行の影響かなんかで、空白行が発生するんです。
これを無くすような文字列リストの追加方法を教えてください。
BCB5です。
0061デフォルトの名無しさん
NGNG0062デフォルトの名無しさん
NGNG改行入れられたくないなら、
Memo->Text = Memo->Text + hogeじゃダメ？
0063デフォルトの名無しさん
NGNG文字列リストへAdd(ほげ)、Add(ほげ)…ってやった後に、
Text+=ちょめってやったら、
***********
ほげ改行
ほげ改行
ちょめ
***********
ってなるのかな？
素人おしえてくんスマソ。
自分でやってみます。
006463
NGNGできました。
for(int i=0; i<10; i++) {Memo1->Lines->Add("これは中間行");}
Memo1->Text = Memo1->Text + "ここが最後の行";
これで最後の改行がきえました。
サンキュウデス｡
0065デフォルトの名無しさん
NGNGCodeGuardに補足されるのだけど。
0067デフォルトの名無しさん
NGNGありがとう。試してみたけど駄目だった。
こんな変なコンポーネント使うのも恐いので、他のもので代用することにした。
しかし、Delphi4で修正されたものがどうしてBCB5に残ってるのか。
0068デフォルトの名無しさん
NGNGD4でも直ってないし。
0069デフォルトの名無しさん
NGNG文字列を高速に別の文字へ置換したいのですが、
AnsiString str; // 文章
AnsiString oldstr; // 置換対象の文字
AnsiString newstr; // 置換後の文字
int pos; // 削除指定 先頭場所
int length = oldstr.Length(); // 削除指定 長さ
while ((pos = str.Pos( oldstr )) != 0)
{
str.Delete( pos , length );
str.Insert( newstr , pos );
}
この方法だと、文章５０万文字中に置換対照の文字が
5000〜10000程あると、如何しても何十秒もかかって
しまうのですが、何か良い方法は無いものでしょうか？
0070デフォルトの名無しさん
NGNG素直に、StringReplace使えば？
0071デフォルトの名無しさん
NGNGほれ。
str = StringReplace(str, oldstr, newstr, TReplaceFlags()<<rfReplaceAll);
0072Delフサギコ ◆zE1iiRdQ
NGNG,,,,,,,,,,,,,,,,∧,,∧ ／￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣
〜′,,,,,,,,,,ミ,,ﾟДﾟ彡 ＜ 文字列置換のコツがわかるかも
UU"""" U U ＼＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
http://do.sakura.ne.jp/~junkroom/cgi-bin/megabbs/readres.cgi?bo=lounge&vi=1015685238
最初に出力するoutStrを用意して
SetLengthで予測される十分な長さを確保して
strからoutStrにコピーするのがいいです。
0073デフォルトの名無しさん
NGNG__finally使った下のコードで
[C++ 警告] xx: W8070 関数は値を返すべき って言われたんだけど
これは例外が起きた時に帰り値が不定になるって事だよね？
でも、じゃどう書けばいいの？
long *getBin(char *fname)
{long *mem;
FILE *fp=fopen(fname,"r");
if(fp==NULL) return 0;
try {
if( 0!=fseek(fp, 0, SEEK_END ) ) return 0;
long size=ftell(fp);
size=(size+3) &(-4);
if( 0!=fseek(fp, 0, SEEK_SET ) ) return 0;
mem =(long *) malloc( size );
fread(mem,size/4,4,fp);
return mem;
}__finally{fclose(fp);};
}
007473
NGNG0075デフォルトの名無しさん
NGNGつーかそれ以前にBuilderは関数の途中でreturnしたら
__finally内は実行されないのでそのコードははげしく問題あるぞ。
007673
NGNG気になって今、fcloseで改行入れてブレークポイントかけたらちゃんと 停止しました
007873
NGNGDelphiだと 単に exit するだけだから、 こういう処理スタイルでいいんだけど
C++とcライブラリの組み合わせで __finally って案外と使い難いですね。
・・・だから最初からfinallyが導入されなかったのかな
007975
NGNGたしかにC++だと__finallyよりauto_ptr等のように
スタックの巻き戻しでやるのが一般的かな。
とりあえず>>73のコードは return mem; を __finally の外に
書けば Warning は消えそうな気がする。
コンパイラの警告が __finally に完全対応していないのかな？
008073
NGNG__finally の下に return 0; 書いたら 警告はきえたし、ちゃんと動いた。
ありがとう。
cのライブラリだけだから例外が起きる可能性は無いと思うんだけど、そこまでは
コンパイラは判らないんだろうね
008173
NGNGたしかにコッチの方が __finally よりスッキリするみたい
long *getBin(char *fname)
{long *mem=0;
struct DFILE{
FILE *fp;
DFILE(char *n) {fp=fopen(n,"rb");};
~DFILE(){ if(fp){fclose(fp); };}
}f(fname);
if( 0!=fseek(f.fp, 0, SEEK_END ) ) return 0;
long size=ftell(f.fp);
size=(size+3) &(-4);
if( 0!=fseek(f.fp, 0, SEEK_SET ) ) return 0;
mem =(long *) malloc( size );
fread(mem,size/4,4,f.fp);
return mem;
}
0082デフォルトの名無しさん
NGNGで、２次元配列をソートする方法ってありませんか？
0083デフォルトの名無しさん
NGNG0084デフォルトの名無しさん
NGNGどのようなソートを望むのだ。
008582
NGNGn番目のiをソートキーとして、行単位にソートしたいです。
0086Delフサギコ ◆zE1iiRdQ
NGNG〜′,,,,,,,ミ,,ﾟДﾟ彡＜ できると思いまフ>>83
UU""" U U ＼＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
とりあえず
TCuteMemoを利用するなり
0087デフォルトの名無しさん
NGNGfseekの前にfpのNULLチェックしないの？
それと余計なセミコロンは癖ですか？
0088デフォルトの名無しさん
NGNG0089通り掛かり
NGNGこんなのでいかがですか。
void __fastcall TForm1::FormPaint(TObject *Sender)
{
char bmih[sizeof(BITMAPINFOHEADER)+4*256];
unsigned char Pixels[256][(256+3)/4*4];
BITMAPINFOHEADER *lpbi=(BITMAPINFOHEADER *)bmih;
lpbi->biSize=sizeof(BITMAPINFOHEADER);
lpbi->biWidth=256;
lpbi->biHeight=256;
lpbi->biPlanes=1;
lpbi->biBitCount=8;
lpbi->biCompression=0;
lpbi->biSizeImage=256*256;
lpbi->biXPelsPerMeter=0;
lpbi->biYPelsPerMeter=0;
lpbi->biClrUsed=0;
lpbi->biClrImportant=0;
RGBQUAD *lpQuad=((LPBITMAPINFO)bmih)->bmiColors;
for (int i=0;i<256;i++)
{
lpQuad[i].rgbRed =(unsigned char) i;
lpQuad[i].rgbGreen =(unsigned char) i;
lpQuad[i].rgbBlue =(unsigned char) i;
lpQuad[i].rgbReserved =0;
}
for(int i=0;i<256;i++)
{
for(int j=0;j<256;j++)
{
Pixels[i][j]=(unsigned char)j;
}
}
SetDIBitsToDevice(Canvas->Handle,0,0,256,256,0,0,0,256,Pixels,(LPBITMAPINFO)lpbi,DIB_RGB_COLORS);
}
0090デフォルトの名無しさん
NGNG{
AnsiString test = "abc";
return test;
}
main()
{
AnsiString str;
str = testfunc();;
}
というようにやった時strは元のtestがスコープ外に出てしまっているので
中身が不定になる可能性があるのでしょうか？
それともかならずstrの中身はabcになるのでしょうか？
0091デフォルトの名無しさん
NGNG大丈夫。だと思う。
VCLのソースをみた訳じゃないからなんとも言えないけど、
常識的な文字列クラスなら普通大丈夫。
0092デフォルトの名無しさん
NGNGどうやればいいの？
0093デフォルトの名無しさん
NGNG常識的な文字列クラスなので、大丈夫。
0094デフォルトの名無しさん
NGNG行と列が逆なら簡単なんだけど、それじゃだめ？
0097デフォルトの名無しさん
NGNG0098デフォルトの名無しさん
NGNGできますか？
009994
NGNGコンパイラ通してなから間違いがあるかも知れないけど…。
typedef std::vector<AnsiString> StrVec;
class compare_by_nth : public std::binary_function<const StrVec&, const StrVec&, bool>
{
int i_;
public:
compare_by_nth(int i) : i_(i) {}
bool operator<(const StrVec& a, const StrVec& b) const {return a[i_] < b[i_];}
};
std::vector<StrVec> mat;
// mat...
std::sort(mat/begin(), mat.end(), compare_by_nth(1));
詳しいことはSTLスレで聞いて。
0100デフォルトの名無しさん
NGNGこれでは一次元のvectorのソートじゃない？質問は二次元のvectorだった
ような気がするけど。
0101デフォルトの名無しさん
NGNGマウスクリックを感知できませんか?
0103デフォルトの名無しさん
NGNGなるほど。std::vector<StrVec>という所で既に二次元になっているわけか。
ファンクタ作る所なんか、Ｃ言語のqsortを彷彿とさせますね。
0104デフォルトの名無しさん
NGNG<で比較すると、単純なバイトレベルでの比較となるそうだからＯＫじゃない？
ロケールまで入れるとAnsiCompareを使用。ほとんど意味無し。
0105デフォルトの名無しさん
NGNG0106デフォルトの名無しさん
NGNG交互に表示するには、どうすれば良いでしょうか？
0107デフォルトの名無しさん
NGNGCppWebBrowserにNavigateメソッドでアニメーションGIFを読み込ませるw
色々方法があるから何とも言えん。
0108デフォルトの名無しさん
NGNG0111デフォルトの名無しさん
NGNGアクションマネージャーの使い方がよくわかりません。
アクションマネージャーで作成したアクションの
プロパティを変更したい場合、どうやって指定したらいいのだろう・・・。
その方法か、参考になるページがあれば教えてください。
よろしくお願いします。
0112デフォルトの名無しさん
NGNG出力される exe のファイル名を設定するには
どうすればいいですか？
.bpr をメモ帳で開いて
<PROJECT value="ここ.exe"/>
を書き換える以外の方法で、おながいします。
0113デフォルトの名無しさん
NGNGプロジェクト名を変える。
0114106
NGNGすでに指摘された欠点もありますし、
ファイル内にうまく組み込めなかったので、
何か他の方法を教えて頂けないでしょうか？
どうにかして、１秒おきに２枚の画像を
切り替えて表示する動作を実現したいのですが、
そのような方法をどなたかご教授ください。
0115デフォルトの名無しさん
NGNG２個のImageを重ねて置いて、１秒おきにVisibleをtrueにしたりfalseにしたりする。
0117デフォルトの名無しさん
NGNG0118デフォルトの名無しさん
NGNG★BCB★
(σ´ｰ`)σ
0119デフォルトの名無しさん
NGNGcharのフィールドにNULLを登録するのはどうするの？
以下のやり方だと0が入るのですが
TQuery *sql;
（省略）
sql->SQL->Text = "INSERT INTO TBL ( FLD) VALUES ( :DAT)"
sql->Params->ParamByName( "DAT")->AsString = NULL;
sql->ExecSQL();
0121デフォルトの名無しさん
NGNG0122デフォルトの名無しさん
NGNG「VALUES ( :DAT)」って、これでいいのかなぁ？
0123無責任だが
NGNGなにせ問合せでパラメータは使うけど挿入でそんな事した事ないや。
BDE なら sql->Insert();して sql->Fields を使うのがなんと言っても簡単だし
0124119
NGNGおぉ、行けました。
Clear()；だけなら型がわからんから指定しとけってことだったのかぁ
さんきゅです
0125デフォルトの名無しさん
NGNG言いえて妙。
"INSERT INTO TBL ( FLD) VALUES ( :DAT)" なんて
文字列で SQL文を書いてしまうと、
せっかくのコンパイラのチェック機能がスルーされてしまうし。
…ってことかな？
ヽ（;´Д｀）ﾉ ｱﾚ ?
( ____ )
＠＝＝ > ＝ >＝＝
0126デフォルトの名無しさん
NGNGMS-DOSプロンプトで結果が表示された後すぐにウィンドウが閉じてしまうのですが、
閉じないようにするにはどうしたらいいのでしょうか？
MS-DOSのプロパティで「プログラム終了時にウィンドウを閉じる」のチェックは
はずしてみましたが駄目でした。
0127デフォルトの名無しさん
NGNG#include <conio.h>
int main()
{
...
...
getch();
return 0;
}
0128デフォルトの名無しさん
NGNG#include <cstdlib>
using namespace std;
int main()
{
..
..
system("pause");
}
0129デフォルトの名無しさん
NGNGint main()
{
...
...
while(1)
;
}
0130デフォルトの名無しさん
NGNG(?∀?)ﾄﾞﾚ?
0131デフォルトの名無しさん
NGNG0132デフォルトの名無しさん
NGNGどれ、おいちゃんがageといてやろう。
0133デフォルトの名無しさん
NGNG何も書かなくても450kbか。
0135デフォルトの名無しさん
NGNG>>126-130
漏れは、DOS窓を起動してから
ProjectHoge.exe [Enter] していますが、何か？
標準出力に何かを出力するアプリケーションなら、
リダイレクトしてファイルに採っておけばよいし。
0136デフォルトの名無しさん
NGNG出来ました。
ありがとうございます。
0137Ð ë á t h ¹³
NGNGstruct TValue
{
int Value1;
int Value2;
};
asm
{
MOV [ESI+.Value1],EAX //○
MOV [(TValue PTR ESI).Value1],EAX //×
}
STRUC〜ENDSで構造体を定義すると×の行もエラーは出ないのですが、
そうするとC++のほうで、その構造体が使えなくなります。
○の方法だとオペランドサイズのチェックをしてくれないので
どうしても×のようにチェックしてくれる方法を使いたいんですが、
何か方法（×の行のエラーの出ない書き方とか）はないでしょうか。
0138無責任だが
NGNGそういうふうにしたい場合は、H2ASH （使い方はTSM_UTIL.TXTに ）で構造体を変換して
それをインクルートするのが普通じゃないかな
MOV [ESI+.Value1],EAX のような使い方だと、それはBCC32でコンパイルされると
MOV [ESI+0],EAX になってしまう
0139Ð ë á t h ¹³
NGNGありがとうございます。そんなのがあったんですね。
なぜかうちのBCBにはH2ASHが無い･･･CDにも入ってない･･･。
バージョン古いからかな。
> MOV [ESI+0],EAX になってしまう
そう、これで困ってました。即値になるだけで修飾はされないんですよね。
WEBでTSM_UTIL.TXT見るとH2ASHを使えば解決できそうですが、
無いものは仕方無いので、夜になったら（ﾃﾚﾎなので(*´д`) ）
フリーのBC++ダウンロードして入ってないか調べてみます。
■ このスレッドは過去ログ倉庫に格納されています