C# vs Delphi Round 1
レス数が1000を超えています。これ以上書き込みはできません。
0001デフォルトの名無しさん
NGNGやっぱり死滅しちゃいますか?
0002manko chinko
NGNG>やっぱり死滅しちゃいますか?
しません。
0003デフォルトの名無しさん
NGNG腹違いの兄弟みたいなもんだ。
0004デフォルトの名無しさん
NGNGDel厨ハケーン
0005manko chinko
NGNG>Del厨ハケーン
Delphiはフリーなバージョンをちょっと触ったことがあるだけです。
0006デフォルトの名無しさん
NGNGDelphi VS VB.NET
http://pc.2ch.net/test/read.cgi/tech/1020258278/l50
.NET大ブーム2
http://pc.2ch.net/test/read.cgi/tech/1020703159/l50
VBをばかにするな!
http://pc.2ch.net/test/read.cgi/tech/1021038130/l50
0007デフォルトの名無しさん
NGNGよろしくお願いします。
0008デフォルトの名無しさん
NGNGまともな人は一切触りません。
0009manko chinko
NGNG>まともな人は一切触りません。
へー
「ということにしたい」ですか:)
0010デフォルトの名無しさん
NGNG0012デフォルトの名無しさん
NGNG0013manko chinko
NGNG>Kusakabeハケーン!!
それって誰?
0014manko chinko
NGNG>>「ということにしたい」ですか:)
>
>ということにしたいのですね? :)
思考停止ですか?
0015デフォルトの名無しさん
NGNG>>「ということにしたい」ですか:)
>ということにしたいのですね? :)
ということにしたいのですね? :)
0016デフォルトの名無しさん
NGNG>>「ということにしたい」ですか:)
>ということにしたいのですね? :)
>ということにしたいのですね? :)
ということにしたいのですね? :)
0017デフォルトの名無しさん
NGNGDel厨ってどこでも出てくるし...
0018デフォルトの名無しさん
NGNGあなたのようなどこにでも現れるアンチDelには迷惑しています。
C#プログラマより。
0019デフォルトの名無しさん
NGNGDel厨は (・∀・)カエレ!!
0020デフォルトの名無しさん
NGNG○★%&’”#$%&$%〜|)`@:Del+”▲□’”#$%&$
’”#$%&$$%
0021デフォルトの名無しさん
NGNGまたDelphiスレかよ...
いいかげん引き際ってのを覚えたほうがいいんじゃない?
0022デフォルトの名無しさん
NGNG0023デフォルトの名無しさん
NGNGうれしいくせに(藁
ところであんたが最後に使った言語って何?
0024デフォルトの名無しさん
NGNG0025デフォルトの名無しさん
NGNG【35才】VB.NETがさっぱりわかりません【定年】
http://pc.2ch.net/test/read.cgi/tech/1021218036/l50
こことかは?
0026デフォルトの名無しさん
NGNG0027デフォルトの名無しさん
NGNG0028デフォルトの名無しさん
NGNGこれだけの差がついたらどちらを選ぶかは自明の理だな。
言語仕様
C#>>>>>>>Delphi
開発環境
C#(VS.NET)>>>>>>>>>>>>>>>Delphi
クラスライブラリ
C#>>>>>>>>>>>>>>>>>>>>>>>>Delphi
マルチプラットフォーム(予定)
C#>>>>>>>>>>>>>>Delphi
開発者人口
C#>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>Delphi
将来性
C#>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>Delphi
0029デフォルトの名無しさん
NGNGというアプリをDelphiとC#で作ってみますか?
0030デフォルトの名無しさん
NGNG今時CSVですか?
表形式のHTML?XMLを吐き出してXSLTで整形とかいう考えは浮かばないの?
アプリ以前の問題で時代遅れ臭がただよってるね。(プ
0031デフォルトの名無しさん
NGNGXMLにするなら CSVの最初の1行はタイトル行という事にしましょうか
0032デフォルトの名無しさん
NGNG<SINE>
Del厨にXMLは使いこなせない。これ定説。(嘲笑激藁
</SINE>
</XML>
0033デフォルトの名無しさん
NGNGそういう問題じゃなくて、始めからXMLのデータとXSLを用意しておけばIEで表示して終わりということ。
アプリそのものが必要ない。
0034デフォルトの名無しさん
NGNGアプリそのものが必要ないなら、それを作る道具も人間も必要ないですね。
0035デフォルトの名無しさん
NGNG( ´,_ゝ`)プッ
DelphiよりもXMLの基礎を学んだ方がいいんじゃないの?(w
0036デフォルトの名無しさん
NGNG0037デフォルトの名無しさん
NGNGアプリを作るだけの人間は必要ないけど、
問題解決出来る人は必要になるのではないでしょうか。
そうでない人は淘汰されるでしょうね。
003829
NGNGなら、同じ目的のコードをどれだけ速く、そしてキレイに書けるのかを
競ってみましょうという趣旨ですから、問題はそちらが出して下さってかまいませんよ
0039デフォルトの名無しさん
NGNG0040デフォルトの名無しさん
NGNGCSV -> XML なら JAVA の例があるので
http://www-6.ibm.com/jp/developerworks/xml/000811/j_xmlexpert-csv.html
http://www-106.ibm.com/developerworks/library/xmlexperts-csv/csvparser-src.html
C#にとってそう難しいコードとは思わないのだけどね
0041デフォルトの名無しさん
NGNG時間帯からみて学生さんじゃないのでしょ? というか学生さんならこれくら
いの課題はこなせるでしょうしね。
もしかして、どっかの人売会社の営業さんがVB使いじゃ売れないくて困って
人材確保用に煽ってるとか?
0042デフォルトの名無しさん
NGNG自分は出来ないくせに人のことを笑う。
そんな人間として問題のある生物に構うのはやめなさい。
0043デフォルトの名無しさん
NGNG0044デフォルトの名無しさん
NGNG状況証拠はそろっている。
少しコードを書けば疑いを晴らすことが出来るんだ。
それをやらずに(嘲笑激藁とか逝ってるんだからねぇ。(嘲笑激藁
0045デフォルトの名無しさん
NGNG0046デフォルトの名無しさん
NGNG文法もライブラリも C#の方が上なんでしょ? なら簡単なんでしょ? なら書いてみせてくれ
0047デフォルトの名無しさん
NGNGそらそうだ。
でも、煽ってるのは(嘲笑激藁だけ。
このスレの癌だなw
0048デフォルトの名無しさん
NGNGならCSV から XMLへの変換くらい数行で書けるんじゃないの?
違うの?
0049デフォルトの名無しさん
NGNG0050デフォルトの名無しさん
NGNG0051デフォルトの名無しさん
NGNG0052デフォルトの名無しさん
NGNG0053デフォルトの名無しさん
NGNG課題>>31 はDelphiのコードは殆ど同じ形式になるので面白くはないと思います
0054デフォルトの名無しさん
NGNGだから、スマートな.NET使いはそんなことでわざわざコード書かないんだっての。
分かってないねー。
0055デフォルトの名無しさん
NGNGお前はそれに該当しないな。
書けないんだし。
0056デフォルトの名無しさん
NGNG0057デフォルトの名無しさん
NGNG実際殆ど真面目にコーディングしなくてもカチカチやってるといけちゃう
んだよ。ただし、、、、役に立たないプログラムはね!(w
0058デフォルトの名無しさん
NGNG0059デフォルトの名無しさん
NGNG0060デフォルトの名無しさん
NGNG日本語出来ない人よりましです。
0061デフォルトの名無しさん
NGNGこんな時間に課題くれなんて言ってる落ちこぼれは自覚がないみたいだ。(嘲笑激藁
0062デフォルトの名無しさん
NGNG一々interface, implementation とか書くのウザイとかのPascal的な部分で
どうも苦手だったんだけど、同じような環境が脱Pascalしてくれただけでも俺
はうれしーよ。
0063デフォルトの名無しさん
NGNGだね。
自分の好きな言語で同じ物が出来るんだから.NETは偉大だ。
0064デフォルトの名無しさん
NGNG0065デフォルトの名無しさん
NGNG0066デフォルトの名無しさん
NGNGまともな言語仕様で自由度の高いRADツールがDelphiしかなかっただけ。
(どっかのVなんちゃらは問題外でした。)
で、現在.NETって言う当時のDelphi系RADと似たコンセプトの標準環境が出た。
俺は現状ではC#がもっとも.NETに適していると思ったからC#を選んだ。
それだけだよ。きっとみんなも。
(違うぞって言うDelphi厨はどんどん反論してくれ。)
0067デフォルトの名無しさん
NGNGどうしてこんな単純なことも分からないのだろう。
0068デフォルトの名無しさん
NGNGまぁ、1プログラマ1言語制を取ってる人種には到底理解できないことなのかもね。
006962
NGNGと小学生の「しょーこみせろー」みたいに繰り返してんの? つーか2ch
の環境でで何を書けと?
0070デフォルトの名無しさん
NGNG上読んでくれ。お題出てる。
0071デフォルトの名無しさん
NGNGプログラムというのは著作物だ。
著作物は既にあるものや、他人が簡単に作れるものは殆ど無価値。
だから自分の技量を十分発揮出来る道具が一つあればそれで十分。
キミに取って C# がソレというのは結構な事だけど、他人に薦めたい
ぜひ広めたいと思うなら、C#のお陰で、自分ならこんなことが出来たっ
て所を見せておくれよ。 話はそれからじゃないの?
結局、道具以上に大事なのは、自分の能力を磨く事じゃないの?
少なくとも言語に関係なく自分オリジナルのコードを書かないとさ、
マニュアル読んでるだけじゃ、コーダかクラッカにしかなれないよ
0072デフォルトの名無しさん
NGNG分かってないねー。自分の能力を磨いてるから偏見抜きで.NETにもチャレンジしてるんだよ。
まあ君らみたいにアンチM$だけがモチベーションじゃ意義のある行動は起こせないだろうけどね。(プッ
0073デフォルトの名無しさん
NGNGいや、別に普及させようって意図はないよ。
自分が使いやすければいい。それが可能なのが.NETなわけだし。
まぁ、放っておいても普及する。
0074デフォルトの名無しさん
NGNG0075デフォルトの名無しさん
NGNG0076デフォルトの名無しさん
NGNGまだ言うかw
0077デフォルトの名無しさん
NGNGPascalが好きな人は当然Delになるのが当然なんでは?
ただ72よ何故煽る?
0078デフォルトの名無しさん
NGNG煽り屋だから
0079デフォルトの名無しさん
NGNGそらそうだ。
問題は会社とかでどの言語に統一する!令が発令されたりしそうだ。
VBとC#はどっちかが淘汰されるんじゃない?
008062(77は付け忘れ、、)
NGNG0081デフォルトの名無しさん
NGNGDelphi.NETが淘汰されると思うよ
008262
NGNG仕事はもともと言語選べないだろ。
0083デフォルトの名無しさん
NGNGそらね。よっぽど良いもの出してこない限りObjectPascal.net以上の評価は受けないだろう。
で、アフォな>>81にはわからんと思うが>>79は言語的機能も守備範囲もかぶっている両者は
どちらが生き残るだろうかと言う話だ。
0084デフォルトの名無しさん
NGNGだから
「.NETで組んでくれんか?」
ってオファーの場合、我が社ではソースの統一もかねて、特殊な用途でない限りはC#を使う。
みたいな。
0090デフォルトの名無しさん
NGNG0092デフォルトの名無しさん
NGNG0094デフォルトの名無しさん
NGNG009562
NGNG0096デフォルトの名無しさん
NGNGじゃVBつかってね。
0097デフォルトの名無しさん
NGNG同意。
0098デフォルトの名無しさん
NGNGそれこそクソ言語ですね。(嘲笑激藁
0099デフォルトの名無しさん
NGNGDelphiより機能は上だよ
0100デフォルトの名無しさん
NGNG具体的に頼む。
0101デフォルトの名無しさん
NGNGデスクトップアプリ以外も作れること
0102デフォルトの名無しさん
NGNG0103デフォルトの名無しさん
NGNG訂正。
デスクトップアプリ以外も「無料のツールで」作れること
0104デフォルトの名無しさん
NGNG>デスクトップアプリ以外も作れること
正気か?
0105デフォルトの名無しさん
NGNGDelphi側の話なら理解できるがVBでそれ言ってるなら・・・痛いな。
0106デフォルトの名無しさん
NGNGDelphi Personalじゃ作れないじゃん。
0107デフォルトの名無しさん
NGNG0108デフォルトの名無しさん
NGNG0109デフォルトの名無しさん
NGNGコンソールアプリとかCGIとか。
0110デフォルトの名無しさん
NGNGソースは?
0111デフォルトの名無しさん
NGNGDelphi Personalじゃ作れないじゃん。(ウィザードないし。)
だったり
Delphi Personalじゃ作れないじゃん。(よく知らないし。)
だと思われ。
0112デフォルトの名無しさん
NGNG0113デフォルトの名無しさん
NGNGそれはデマだって何度も逝ってるでしょ〜が
0114デフォルトの名無しさん
NGNG0115デフォルトの名無しさん
NGNGM$のアクチはクソじゃないのけ?
0116デフォルトの名無しさん
NGNGVSのアカデミック版にも言ってくれ。
0117デフォルトの名無しさん
NGNG0118デフォルトの名無しさん
NGNGファイル 新規作成 その他 でコンソールアプリというのがあるから試してみてね
011962
NGNG0120デフォルトの名無しさん
NGNG0121デフォルトの名無しさん
NGNGデマばっか流してんじゃないよM$社員
0122デフォルトの名無しさん
NGNGあれはプロダクトキー取得とは違います。
0123デフォルトの名無しさん
NGNGそう、はるかにタチが悪い
0124デフォルトの名無しさん
NGNGどういう風に?
0125デフォルトの名無しさん
NGNG0126デフォルトの名無しさん
NGNG0127デフォルトの名無しさん
NGNG確かに、WindowsXPはOEM買えばある程度は済むけどね。
0128デフォルトの名無しさん
NGNG{$APPTYPE CONSOLE}
をどこかに書けば、その時からコンソールアプリになる。
read writeでコンソール入出力が出来る。
だからGUIな画面を持ちながらコンソールアプリにするのも簡単
0129デフォルトの名無しさん
NGNG平日もしくは昼間ならやって言い理由は?
0130デフォルトの名無しさん
NGNG0131デフォルトの名無しさん
NGNGで、VBではどのエディションから出来るの?
CGI位ならDelphiでも作れるが。
0132デフォルトの名無しさん
NGNGしかし .NET もマトモに構築しようと思えば相当な金が必要なのは同じだろう
0133デフォルトの名無しさん
NGNG0134デフォルトの名無しさん
NGNGAllocConsole GetStdHandle ReadFile すれば可能でしょう
0135デフォルトの名無しさん
NGNG0136デフォルトの名無しさん
NGNGttp://www.wwlnk.com/boheme/delphi/techdoc/dad0080.html
0137デフォルトの名無しさん
NGNGところで、アンチDelphiの人は全員10数万円出してからバカにしてるってことで良いの?
0138135
NGNG不便な道具らしいDelでそっちの勉強した方が身に付くと思うから勉強中
0139デフォルトの名無しさん
NGNGまぁ同意。
CなりPascalなりまともな構造化手続き型言語知ってる方がいいな。
0140デフォルトの名無しさん
NGNG.NETランタイムだけでできるよ。無料。
0141デフォルトの名無しさん
NGNGVB6で話をそらさないように。VB.NETならあるよ。
014296
NGNGおい、変な風に話し進めるなよ。
俺はDel厨の>>93が
> 俺は道具指定されて、指定された時間働いてたら金貰える方が羨ましいよ
っていってるから、会社でVB指定されるのが羨ましいのかっていってるんだよ。
0143デフォルトの名無しさん
NGNGVBでも何でもずっと雇って貰えて、人並みに給料もらえるなら有り難い事じゃないか
0145デフォルトの名無しさん
NGNG0146デフォルトの名無しさん
NGNGC++++のこと
0147デフォルトの名無しさん
NGNG0149shige
NGNG0150デフォルトの名無しさん
NGNGじゃ苦労するだろうけどVBつかってね。他の人はDelphiわかんないんだ。会社命令だから。
015162
NGNGこの先何やらされるか分かったもんじゃないし、自分がリーダになったとき
もある程度広く浅く知ってないと他人に割り当てする時アウトだし。
0152デフォルトの名無しさん
NGNG0154デフォルトの名無しさん
NGNGDel厨が嫌がって対決になりません。
0155デフォルトの名無しさん
NGNG先手打てば?さっさと。
そうすれば堂々とお前たちの勝利を宣言できる。
0156デフォルトの名無しさん
NGNGこのスレをダウソしてローカルファイルに保存せよ。
0157デフォルトの名無しさん
NGNG.NETなら10行切るな・・・。
0158デフォルトの名無しさん
NGNGclass a
{
static void main()
{
WebClient b = new WebClient();
b.DownloadFile("http://めんどいから省略〜","c:\a.html");
}
}
0159Delフサギコ ◆zE1iiRdQ
NGNG∧,,∧ / ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
ミ ゚Д゚ミ ∫< ゾヌ作者DaxタンのTips
.(ミ ミっ-~ \__________
〜ミ,,⊃ミ⊃ ああ、ありがたや!
http://members.jcom.home.ne.jp/monazilla/document/indytips.html
0160デフォルトの名無しさん
NGNGメールを送信するプログラムを作成せよ。
0161デフォルトの名無しさん
NGNGinterface
uses Winsock,classes,Windows,SysUtils;
type
TMyHTTP = class
private
wsa :TWSAData;
function MyConnect(URL :string) :Integer;
public
Port :Integer;
Options :TStringList;
constructor Create;
destructor Destroy;override;
function Get(URL :string) :string;
end;
implementation
//接続
//引数:ホスト名
//返値:ソケット
function TMyHTTP.MyConnect(URL :string) :Integer;
var
sock :TSocket;
addr :TSockAddrIn;
hostent :PHostEnt;
begin
0162デフォルトの名無しさん
NGNGaddr.sin_family := AF_INET;
addr.sin_port := htons(Port);
hostent := gethostbyname(PChar(URL));
addr.sin_addr.S_addr := PInteger(HostEnt.h_addr^)^;
connect(sock,addr,sizeof(addr));
Result := sock;
end;
constructor TMyHTTP.Create;
begin
Port := 80;
Options := TStringList.Create;
WSAStartup(MAKEWORD(1, 1),wsa);
end;
destructor TMyHTTP.Destroy;
begin
WSACleanup;
Options.Free;
inherited;
end;
0163デフォルトの名無しさん
NGNG//引数:URL
//返値:リプライメッセージ
function TMyHTTP.Get(URL :string) :string;
var
sock :TSocket;
host :string;
fil :string;
data :array[0..2048] of char;
data2 :array[0..2048] of char;
recvbyte :Integer;
begin
host := Copy(URL,0,Pos('/',URL) - 1);
fil := Copy(URL,Pos('/',URL),length(URL));
StrCopy(data,PChar('GET ' + fil + ' HTTP/1.0'#13#10 + Options.Text + #13#10#13#10));
sock := MyConnect(host);
send(sock,data,2048,0);
while(true) do
begin
recvbyte := recv(sock,data2,2048,0);
if(recvbyte = 0) then
break;
data2[recvbyte] := #0;
0164デフォルトの名無しさん
NGNGend;
closesocket(sock);
end;
end.
晒してみる。
0165デフォルトの名無しさん
NGNGusing System.Web.Mail;
class AAA {
public static void Main() {
MailMessage msg = new MailMessage();
msg.To = "〜";
msg.Subject = "テスト";
msg.Body = "テスト送信します。";
SmtpMail.Send(msg);
}
}
0166デフォルトの名無しさん
NGNG0167デフォルトの名無しさん
NGNG後発かつインターネットでの連携を考慮したライブラリだからね。
0168デフォルトの名無しさん
NGNGbegin〜end読みにくい
静的変数(static)使えない
varの所でしか宣言できない
厨っぽい
0169Delフサギコ ◆zE1iiRdQ
NGNG〜′,,,,,,,,,,ミ,,゚Д゚彡 < けっこう、強力やなー
UU"""" U U[大阪弁]__________
メール送信って、Indyではどや?
NMPOPだとニポン語エンコド問題が
非常にネクになってたので、やりずらかったはず。
0170Del厨房no71
NGNGfunction GetHttp(url:string):string;
var hSession:HINTERNET;
hService:HINTERNET;
var rsiz:DWORD;
buf:string;
begin
Result:='';
setlength(buf,$10000);
hSession := InternetOpen( 'MyApp', INTERNET_OPEN_TYPE_DIRECT, nil,nil, 0 );
if assigned( hSession) then try
hService := InternetOpenUrl( hSession, PChar(url), nil, 0, 0, 0 );
if assigned( hService ) then try
repeat
InternetReadFile( hService , PChar(buf) , length(buf)-10 , rsiz );
Result:=Result+copy(buf,1,rsiz);
until rsiz=0;
finally InternetCloseHandle(hService) ; end;
finally InternetCloseHandle(hSession) ;end;
end;
//////// ほら1行書くだけ ///////
procedure TForm1.FormCreate(Sender: TObject);
begin
Memo1.Lines.Text:= GetHttp('http://pc.2ch.net/test/read.cgi/tech/1021550705/');
end;
0171デフォルトの名無しさん
NGNGかといってAPIで負しても仕方ないしな。
>>168
正直にわからないと言いなさいw
0172デフォルトの名無しさん
NGNGはナシってことで
0173デフォルトの名無しさん
NGNGDel厨も何か有利なお題出してみたら?
0174デフォルトの名無しさん
NGNGソース出さなかった奴に限ってよく吠えるw
0175Del厨房no71
NGNGShellExecute の場合でも エンコードコードが必要なので1レスで書くのは厳しいです
0176デフォルトの名無しさん
NGNGそれならBCBの圧勝ですか?
0177デフォルトの名無しさん
NGNGCDO使えばいいじゃん。
0178Delフサギコ ◆zE1iiRdQ
NGNG∧,,∧∩ / ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
ミ*゚Д゚*ミ < どやってか、コソーリ教えれ
(ミ ミ \____________
〜ミ ,,, ミ
し' `J
ShellExecuteでメーラー起動ならわかるんだが…(藁
0180Delフサギコ ◆zE1iiRdQ
NGNGミ ゚Д゚彡
〜ミ,,,,uuミ
∧ ∧ ショボーン
ミ,,。_。彡
〜ミ,,,,uuミ
メーラー起動なら…
procedure TForm1.Button2Click(Sender: TObject);
var
MailAddress, Subject, Body, CommandLine: String;
begin
MailAddress := '[email protected]';
Subject := 'メールのタイトル';
Body := StringReplace( Memo1.Text, #13#10, '%0D%0A', [rfReplaceAll]) ;
{ #13#10は'%0D%0A'のようにエスケープしる。 }
CommandLine :=
Format('mailto:%s?subject=%s&body=%s', [MailAddress, Subject, Body]);
ShellExecute(Handle, nil, PChar(CommandLine), nil, nil, SW_SHOWNORMAL);
end;
0181Del厨房no71
NGNGエンコードはもっとしっかりやらないと化ける元かも
速度考えないで書いたのは
function EncodeStr(const s:string):string;
var i:integer;
begin
Result:='';
i:=1;
while i<=length(s) do
begin
case s[i]of
#0..#31,'"','''',',','&','%':
Result:=Result+'%'+IntToHex(ord(s[i]),2);
else begin
Result:=Result+s[i];
end;
end;
inc(i);
end;
end;
0182デフォルトの名無しさん
NGNG0183デフォルトの名無しさん
NGNGコード晒さない奴がコード晒す奴をバカにする権利はない。
0184Del厨房no71
NGNGhttp://www.nifty.ne.jp/forum/fdelphi/samples/01302.html
0185デフォルトの名無しさん
NGNGプログラムからHello Worldプログラム(コンソールアプリ)のソースを出力し、
コンパイルし、できたexeを実行せよ。
0186デフォルトの名無しさん
NGNG書いても良いんだけどそれは難題か?
もしかしてDelphiコマンドラインコンパイラ無いとか思ってる?
0187デフォルトの名無しさん
NGNGお前の日本語が難解だよ。
0188Delフサギコ ◆zE1iiRdQ
NGNGミ,,゚Д゚ミ < テキストファイル出力して
ミ ミ \ShellExecuteでdcc.exeに渡して
〜ミ,UU_ミ その結果をShellExecuteするんすか?
こりゃまた....
0189デフォルトの名無しさん
NGNG却下。.NETに有利すぎる。(w
0190デフォルトの名無しさん
NGNG0191デフォルトの名無しさん
NGNGDelphiが試されてるんだからそれでいいんじゃないの?
0192デフォルトの名無しさん
NGNG0193デフォルトの名無しさん
NGNGわざわざCとMFC戦わせてるようなもん。
0194デフォルトの名無しさん
NGNGDelphiだとそういう原始的な手段しかない。
.NETの方はソース生成もコンパイルも実行も、ライブラリの範囲内でエレガントにできてしまう。
0195デフォルトの名無しさん
NGNGprocedure Exec(const Cmd: PChar);
var SInfo: STARTUPINFO; PInfo: PROCESS_INFORMATION;
begin
GetStartupInfo(SInfo);
CreateProcess(nil, Cmd, nil, nil, False, 0, nil, nil, SInfo, PInfo);
WaitForSingleObject(PInfo.hProcess, INFINITE);
end;
var F: Text;
begin
Assign(F, 'b.pas'); Rewrite(F);
Write(F, 'begin Write(''Hello World'') end.');
Close(F);
Exec('dcc32 -cc b.pas'); Exec('b.exe');
end.
0196デフォルトの名無しさん
NGNG>原始的な手段
逆に永遠に生き続けると言うことだよ。w
0197デフォルトの名無しさん
NGNG0198デフォルトの名無しさん
NGNGVCLはへっぽこライブラリという事ですね。
0199デフォルトの名無しさん
NGNG0200デフォルトの名無しさん
NGNGでもそれやると行数食うよ
0201デフォルトの名無しさん
NGNG0202デフォルトの名無しさん
NGNG☆ チン マチクタビレタ〜
マチクタビレタ〜
☆ チン 〃 Λ_Λ / ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
ヽ ___\(\・∀・) < 次のお題まだー?
\_/⊂ ⊂_ ) \_____________
/ ̄ ̄ ̄ ̄ ̄ ̄ /|
| ̄ ̄ ̄ ̄ ̄ ̄ ̄| |
0203デフォルトの名無しさん
NGNG0204デフォルトの名無しさん
NGNG円周率を100桁求めて下さい。
0205Delフサギコ ◆zE1iiRdQ
NGNGミ ゚Д゚彡
〜ミ,,,,uuミ
マジでそんなに簡単にできんの?
自分でエディタ作ったとして、
秀マクロみたいなのが、簡単に作れるってわけざんすか
C#移行か…
さっさと、Delphi.NETしてホスイですね。
0206デフォルトの名無しさん
NGNG0207デフォルトの名無しさん
NGNGCodeDOMなんか実装してたら日が暮れます。
0208デフォルトの名無しさん
NGNG0209デフォルトの名無しさん
NGNGXMLファイルを構造体/クラス/レコードに読み込むプログラム。
<Person>
<Name>フサギコ</Name>
<Age>6</Age>
<Job>
<Title>遊び人</Title>
</Job>
</Person>
構造体はC風に書くと
struct Person {
char* name;
int age;
struct Job* job;
};
struct Job {
char* title;
}:
こんな感じで。やりやすい格好であればいいです。
0210195
NGNGひょっとして.NETだとコンパイラ作るのが楽?興味ありありです。
0211デフォルトの名無しさん
NGNG0212デフォルトの名無しさん
NGNG確かECMAには初めから盛り込まれてなかったね。
>>194ははったりなんですか?
0213デフォルトの名無しさん
NGNG0214デフォルトの名無しさん
NGNG0215デフォルトの名無しさん
NGNGhttp://taruo.net/e/
とか参照して。
0216Del厨房no71
NGNGん? ,NET 嫌いだけど 評価の為に買ってるよ
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0; .NET CLR 1.0.3705)
0217デフォルトの名無しさん
NGNGhttp://do.sakura.ne.jp/~junkroom/cgi-bin/megabbs/readres.cgi?bo=lounge&vi=1003826049
>>209なんか.NETで何の変換作業もいらないじゃん。
0218デフォルトの名無しさん
NGNG分っててやってるんですが(笑い
Delphiでは、まあDOMパーザはどっかから持ってくるとして、
そこからシコシコ取り出すしかないですよね?
0219Del厨房no71
NGNGXML はDTDで必ずフィールドがあるように出来るから、
delphiでも pos関数で探して取り出す方法で取り出しても問題ないよ
そしてたぶんその方法が早くて簡単・・・でも面白くない
0220デフォルトの名無しさん
NGNGXMLの先頭行に
<?xml version="1.0" encoding="Shift_JIS"?>
が必要。
using System.Xml;
using System.Xml.Serialization;
public class AAA {
public static void Main() {
XmlSerializer s = new XmlSerializer(typeof(Person));
XmlTextReader r = new XmlTextReader("data.xml");
Person p = (Person)s.Deserialize(r);
r.Close();
}
}
public class Person {
public string Name;
public int Age;
public Job Job;
}
public class Job {
public string Title;
}
0221195
NGNGXMLファイルからやりとり用インターフェース生成する機能ありませんでした?ダイレクトメールに書いてあった記憶が…
0222デフォルトの名無しさん
NGNG0223デフォルトの名無しさん
NGNG0224Del厨房no71
NGNGDelphi用語で実行時型情報でプロパティ名を探して一致するプロパティがあれば自動的に格納される
というような感じですか?
面白そうですね。そういう関数作ってみようかな
0225デフォルトの名無しさん
NGNG0227デフォルトの名無しさん
NGNGだとするならXmlSerializerみたいなのも作れるのかな。やったね!
0228デフォルトの名無しさん
NGNG0229195
NGNGこれが本当なら何の苦もなくXML処理できそうなのですけど、実際のとこ教えてくれませんか?→Enterprise版持っている人
---------------------
XML データバインディングウィザード
この新しいウィザードは,XML データファイルのアクセスと更新を行うための非常に簡単な方法を提供する Delphi コードを生成します。
生成されるコードは,自然で直感的なプロパティベースのプログラミングモデルなので,Delphi コンポーネントのプログラミングと同じような感覚で XML データを操作できます。
XML データバインディングは,XML ドキュメントオブジェクトモデル(DOM)インターフェースを使う場合に必要な複雑なコーディングに代わるもので,検証された XML ドキュメントを操作するアプリケーションに最適です。
XML ドキュメントのプログラミング
XML データバインディングは,新しい TXMLDocument コンポーネントとその関連インターフェース IXMLDocument/IXMLNode に基づいています。
このコンポーネントは,XML データ処理用の DOM インターフェースの簡略版を提供します。TXMLDocument をフォームに配置し,その FileName プロパティを設定し,Active を true を設定するだけで,すべての XML データに簡単にアクセスできるようになります。
クロスプラットフォーム/ベンダーに依存しない DOM プログラミング
XML ドキュメントプログラミングサポートの最下位レベルにあるのが,新しい xmldom.pas インターフェースユニットです。
このインターフェースユニットは,クロスプラットフォームでベンダーに依存しない,W3C DOM Level 2 仕様に準拠したプログラミングを可能にするインターフェースのセットを提供します。
オープンアーキテクチャで設計されたこれらのインターフェースは,既存の DOM ベースの XML ソリューションに簡単に組み込むことができます。
データベースアプリケーションでの XML の使用
一連の新しいコンポーネントにより,XML ドキュメントを製品のデータベースアーキテクチャに組み込むことが可能になります。
コンポーネントは,任意の XML ドキュメントとクライアントデータセットのデータパケットとの間のマッピングを定義するための設計時ツールである
XML マッパーによって生成されたトランスフォーメーションファイルを使用します。
0230デフォルトの名無しさん
NGNGuses 224;
type
TJob = class
published
property Title:string;
end;
TPerson=class
published
property Name:string;
property Age:Integer;
property Job:TJob;
end;
TPersonClass = class of TPerson;
var dlist:TList;
i:Integer;
begin
with TStringList.Create do try
LoadFromFile('file.XML');
dlist:= XmlSerialize(text,TPersonClass) ; //結果はTList型で帰る
for i:=0 to dlist.Count-1 do begin
//ここで必要な処理
end;
finally free;end;
end;
0231デフォルトの名無しさん
NGNG0232デフォルトの名無しさん
NGNG遠くから見ても分割が一目でわかるのは絶対にC#だと思う。
それが幼稚だという人もいるかも知れんが、幼稚でも仕事が速いほうが良い。
0233デフォルトの名無しさん
NGNG0234デフォルトの名無しさん
NGNG0235デフォルトの名無しさん
NGNGそんなアヤシイものより、MSXMLのほうがいいだろ。
最新版ダウソできるし、定期的にバグ修正版出してるし。
簡易HTTPまでついてるから、クライアントサイドはこれだけでOK。
0236デフォルトの名無しさん
NGNG2chでは再現できない部分だね
Delが最初から予約語を太字で表現できたのに対し
VSは.NETになってからじゃなかったっけ
0237デフォルトの名無しさん
NGNGこういうのを想定してたのかな?
using System;
using System.CodeDom;
using System.CodeDom.Compiler;
using System.IO;
using System.Reflection;
using System.Text;
class Test
{
public static void Main() {
// CodeDomを取得
CodeCompileUnit unit = GenerateCompileUnit();
// 言語を決定
CodeDomProvider provider = new Microsoft.CSharp.CSharpCodeProvider();
// CodeDomProvider provider = new Microsoft.VisualBasic.VBCodeProvider();
// CodeDomProvider provider = new Microsoft.JScript.JScriptCodeProvider();
// ソースを出力
using ( StreamWriter w = new StreamWriter("Hello.cs", false, Encoding.GetEncoding("Shift_JIS")) ) {
ICodeGenerator gen = provider.CreateGenerator();
gen.GenerateCodeFromCompileUnit(unit, w, null);
}
// コンパイル
CompilerParameters param = new CompilerParameters();
param.GenerateExecutable = true;
param.OutputAssembly = "Hello.exe";
ICodeCompiler compiler = provider.CreateCompiler();
compiler.CompileAssemblyFromDom(param, unit);
// 実行
AppDomain.CurrentDomain.ExecuteAssembly("Hello.exe");
}
0238デフォルトの名無しさん
NGNG// Hello WorldプログラムのCodeDomを生成する。
public static CodeCompileUnit GenerateCompileUnit() {
CodeCompileUnit unit = new CodeCompileUnit();
CodeNamespace ns = new CodeNamespace();
unit.Namespaces.Add(ns);
CodeTypeDeclaration hello = new CodeTypeDeclaration("Hello");
hello.TypeAttributes = TypeAttributes.NotPublic;
ns.Types.Add(hello);
CodeEntryPointMethod main = new CodeEntryPointMethod();
hello.Members.Add(main);
CodeMethodInvokeExpression write_line = new CodeMethodInvokeExpression();
write_line.Method = new CodeMethodReferenceExpression( new CodeTypeReferenceExpression(typeof(Console)), "WriteLine" );
write_line.Parameters.Add( new CodePrimitiveExpression("Hello World!!") );
main.Statements.Add(write_line);
return unit;
}
}
0239デフォルトの名無しさん
NGNG0240デフォルトの名無しさん
NGNGDelphi以上に文字打つのが面倒そう。
コンパイルに何秒ぐらいかかりましたか?
0241デフォルトの名無しさん
NGNG1秒もかからないよ
0242デフォルトの名無しさん
NGNG>Delphi以上に文字打つのが面倒そう。
確かに。Javaと同程度かな。
0243Delフサギコ ◆zE1iiRdQ
NGNG∧,,∧ /なにげに、>>195さんのコードの動作確認。
ミ;゚Д゚彡 < ………神っ!!!
ミつ つ゛ \
@ミ ミ なにゆえこんな芸当が...!!
∪''∪ このスレで神の領域を見るとは...アリガタヤアリガタヤ
このコード...どんなDelphiソースでもコンパイル化なの?
0244デフォルトの名無しさん
NGNGusing System;
using System.IO;
using System.Text;
using Microsoft.CSharp;
class Test
{
public static void Main() {
// ソース定義
StringWriter s = new StringWriter();
s.WriteLine("using System;");
s.WriteLine("");
s.WriteLine("class Hello {");
s.WriteLine(" public static void Main() {");
s.WriteLine(" Console.WriteLine(\"Hello World\");");
s.WriteLine(" }");
s.WriteLine("}");
s.Close();
// ソース生成
using ( StreamWriter w = new StreamWriter("Hello.cs", false, Encoding.Default) ) {
w.Write( s.ToString() );
}
// コンパイル
Compiler.Compile(
new string[] { s.ToString() },
new string[] { "Hello.cs" },
"Hello.exe",
null,
null
);
// 実行
AppDomain.CurrentDomain.ExecuteAssembly("Hello.exe");
}
}
0245Delフサギコ ◆zE1iiRdQ
NGNGミ 彡 < どっちの厨も
(ミ ミ) \_______
ミ ミ
∪ ∪
∧,,∧ サッ / ̄ ̄ ̄ ̄ ̄ ̄ ̄
ミ,,゚Д゚ミ < だまっちゃいました。
⊂ Om \_______
ミ、,, ミ,
.しヾJ
∧,,∧ ま゙
ミ゚Д゚,,彡 仲良くやんなさい。
⊂ ミ)
ミ ミ
∪''∪ 言語の進化が促されて
面白くなってきたよね。
.NETフレームワークにもDelphi.NETにも期待してよし。
で。次のお題はぁ??
0246195
NGNG>>188でフサギコさんが言ったのと同じことやってるんですけど… マアワルイキハシマセンガ
0247デフォルトの名無しさん
NGNG0248Delフサギコ ◆zE1iiRdQ
NGNG,,,,,,,,,,,,,∧,,∧ /ほんとにやっちまうとは主輪なんだ。
〜′,,,,,,,ミ,,゚Д゚彡< んで、あんなに簡単にやるとも主輪なんだ。
UU""" U U \_>>195さんカコイイ・・
C#ソースも、コンパイラをオブジェクトで扱えるのも
かなり素敵ネ。CodeDomよりソース綺麗じゃ。
そしたら..
b.exeと元プロジェクトのexeとの通信が出来たら...
WM_COPYDATAとか、DDEあたりで、、。。
否、、リダイレクソンとかで可能なのかな?
.
とりあえず、それが出来たら
アプリケーションユーザーに
Delphiソースでマクロ書いてもらったら
ExeやDLLにして元アプリの動作を変更できたりするのかな?
…って。アプリユーザーにもDelphiコンパイラが
必要なのか...まあ。仕方ない無料だしダウソしてもらうのがスジか。
0249195
NGNG237-238すごいなー。
とりあえず244がコンパイルできないんですけど("Compiler"が見つからない)どうすればいいのかな…
Pascal系言語.NETは既に2種類ぐらい出てますよ。Delphi.NETが出たらもうひとつ増えることになりますね。
OberonよりObjectPascalが好きなのでDelphi.NET期待です。
マクロ目的ならそんな面倒なことしなくてもBPL作ってもらえばDelphi IDEみたいにできるのでは…
229にDelphi使いが返事くれないということは、ここにEnterprise使ってる人はいないってことですか…
自分もそうだから何も言いませんけど。
…それにしても静かだ。皆さん寝てしまったのかな。けっこう良スレになっちゃいましたね、ここ。
0250Delフサギコ ◆zE1iiRdQ
NGNG∧,,∧ / Indyのメーラーサンプルは
ミ,,゚Д゚彡< こんなソースでした。
ミつ[お手紙]) いまさらながら。
〜ミ ミ.  ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
U U これを使えばデラ簡単にメール送信可でした
D6ProIndyメーラーサンプルのコピペ
procedure TfrmMessageEditor.bbtnOkClick(Sender: TObject);
begin
with IdMsgSend do
begin
Body.Assign(Memo1.Lines);
From.Text := UserEmail;
Recipients.EMailAddresses := edtTo.Text; { To: header }
Subject := edtSubject.Text; { Subject: header }
Priority := TIdMessagePriority(cboPriority.ItemIndex); { Message Priority }
CCList.EMailAddresses := edtCC.Text; {CC}
BccList.EMailAddresses := edtBCC.Text; {BBC}
if chkReturnReciept.Checked then
begin {We set the recipient to the From E-Mail address }
ReceiptRecipient.Text := From.Text;
end
else
begin {indicate that there is no receipt recipiant}
ReceiptRecipient.Text := '';
end;
end;
{authentication settings}
case SmtpAuthType of
0: SMTP.AuthenticationType := atNone;
1: SMTP.AuthenticationType := atLogin; {Simple Login}
end;
SMTP.UserID := SmtpServerUser;
SMTP.Password := SmtpServerPassword;
{General setup}
SMTP.Host := SmtpServerName;
SMTP.Port := SmtpServerPort;
{now we send the message}
SMTP.Connect;
try
SMTP.Send(IdMsgSend);
finally
SMTP.Disconnect;
end;
end;
_________
∧,,∧ /
ミ,,゚Д゚彡< BPLってDLLでしたっけ。
ミつ つ \
〜ミ ミ.  ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
U U 世の中ややこしい事でイパーイね。
0251デフォルトの名無しさん
NGNGcscompmgd.dllを参照すべし。
0252デフォルトの名無しさん
NGNGusing System.Diagnostics;
using System.IO;
using System.Text;
using System.Web.UI;
class Test
{
public static void Main() {
// CSVの読み込み
string csv_text = null;
using ( TextReader r = File.OpenText("data.csv") ) {
csv_text = r.ReadToEnd();
}
// HTMLの書き込み
using ( TextWriter w = new StreamWriter("table.html", false, Encoding.Default) ) {
HtmlTextWriter w2 = new HtmlTextWriter(w, " ");
w2.WriteFullBeginTag("html");
w2.WriteLine();
w2.Indent++;
w2.WriteFullBeginTag("body");
w2.WriteLine();
w2.Indent++;
w2.WriteBeginTag("table");
w2.WriteAttribute("border", "1");
w2.Write(HtmlTextWriter.TagRightChar);
w2.WriteLine();
0253デフォルトの名無しさん
NGNG// CSVのデータを1行づつ読み込む
using ( TextReader r = new StringReader(csv_text) ) {
string record = null;
w2.Indent++;
while ( (record = r.ReadLine()) != null ) {
w2.WriteFullBeginTag("tr");
w2.WriteLine();
string[] columns = record.Split( new char[] { ',' } );
w2.Indent++;
foreach (string s in columns) {
w2.WriteFullBeginTag("td");
w2.Write(s);
w2.WriteEndTag("td");
w2.WriteLine();
}
w2.Indent--;
w2.WriteEndTag("tr");
w2.WriteLine();
}
}
w2.Indent--;
w2.WriteEndTag("table");
w2.WriteLine();
w2.Indent--;
w2.WriteEndTag("body");
w2.WriteLine();
w2.Indent--;
w2.WriteEndTag("html");
w2.WriteLine();
w2.Close();
}
// ブラウザ起動
Process.Start("table.html");
}
}
0254デフォルトの名無しさん
NGNGうーん たとえ短いテストプログラム作る時でも、ある程度は構造化した方がいいよ。
それVB使いや古いCプログラマみたい
対抗するDelのコードはこれだね
http://pc.2ch.net/test/read.cgi/tech/1021596367/19
このスレ全体にDel使いは比較的構造化してるのが印象的
0255デフォルトの名無しさん
NGNG生まれたときから構造化ですからw
原因を考えてみる。
・イベントメソッドなどで関数とか手続きとか見慣れてる。
・Cか何かで構造化を学んでからDelphiに魅入られた。
0256デフォルトの名無しさん
NGNGそれに好きな所で変数宣言出来ないのも構造化しなければならない事に繋がるし
>>252 のコードも
string[] columns = record.Split( new char[] { ',' } );
とここで変数宣言出来ないなら ここで別メソッドにするだろうし
0257デフォルトの名無しさん
NGNG>function f(fname:string):TStrings;
でも俺、こんなソース書くヤツと仕事したくないけど・・・。
0258デフォルトの名無しさん
NGNG0259デフォルトの名無しさん
NGNG納得出来るものを提出出来る迄のバトルを
0260デフォルトの名無しさん
NGNG0261254
NGNG0262voke
NGNG0263デフォルトの名無しさん
NGNG0264デフォルトの名無しさん
NGNGttp://sun.freehost.ne.jp/~planetj/munemune/nakagawa3.htm
0265デフォルトの名無しさん
NGNGでも出力されるHTMLはきれいに整形されてるよ。
0266252
NGNGHtmlTextWriterじゃなくてXmlTextWriterが使えるんだった。
ということで、ちょっと修正。あいかわらず構造化はしてないけど。(藁
using System.Diagnostics;
using System.IO;
using System.Text;
using System.Xml;
class Test
{
public static void Main() {
// CSVの読み込み
string csv_text = null;
using ( TextReader r = File.OpenText("data.csv") ) {
csv_text = r.ReadToEnd();
}
// HTMLの書き込み
XmlTextWriter w = null;
try {
w = new XmlTextWriter("table.html", Encoding.Default);
w.Formatting = Formatting.Indented;
w.Indentation = 2;
w.WriteStartElement("html");
w.WriteStartElement("body");
w.WriteStartElement("table");
w.WriteAttributeString("border", "1");
0267252
NGNG// CSVのデータを1行づつ読み込む
using ( TextReader r = new StringReader(csv_text.ToString()) ) {
string record = null;
while ( (record = r.ReadLine()) != null ) {
w.WriteStartElement("tr");
string[] columns = record.Split( new char[] { ',' } );
foreach (string s in columns) {
w.WriteStartElement("td");
w.WriteString(s);
w.WriteEndElement();
}
w.WriteEndElement();
}
}
w.WriteEndElement();
w.WriteEndElement();
w.WriteEndElement();
}
finally {
if (w != null) w.Close();
}
// ブラウザ起動
Process.Start("table.html");
}
}
0268デフォルトの名無しさん
NGNG分かりやすさも大事。
0269デフォルトの名無しさん
NGNG0270デフォルトの名無しさん
NGNGない。性器表現を使うのかな。
0271デフォルトの名無しさん
NGNGこれだと正常に読めないファイルが結構でそうだね。
0272デフォルトの名無しさん
NGNG0273デフォルトの名無しさん
NGNG一行にはならないよ。
0275デフォルトの名無しさん
NGNGやっぱソースが汚くなるねえ・・・。
0276デフォルトの名無しさん
NGNGあとはDelphi側の>>209を待つのみ。
0277Del厨房no71
NGNGでも >>224は撤回 Delではプロパティに使える名前に日本語が使えない
だから、TStringsで渡したのと一致するかを検索する方式にしようと思う
与えるのは文字列は
Person.Name
Person.Age
Person.Job.Title
で、XMLを再帰的に調べていって検索して一致する都度コールバックさせる
という仕様の関数でいい?
0278デフォルトの名無しさん
NGNGそこまで小難しいお題じゃないと思うよ。
構造体を定義して、XMLを読み込んでインスタンス作るだけでいいんじゃないの?
0279195
NGNGTJob = class(TPersisitent)
published
property Title: string;
end;
TPerson = class(TComponent)
published
property Name: string;
property Age: Integer;
property Job: TJob;
end;
"BizSnap"なるものが使えたらひょっとしてこれが自動で…とか思いますけど、Enterprise版持ってる人がいなさそうなのが惜しい…
0280Delフサギコ ◆zE1iiRdQ
NGNG∧,,∧ /D6が出たころ
ミ,,゚Д゚彡 < どっかのスレで書きましたが
U つ \
@ミ ミ  ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
∪''∪ およそ、1年前だっけ。
D6の案内状パンフからの飲尿
エンプラ版だけどね。
> たとえば、次のようなXMLデータがあると、
> <customer id=1>
> <name>Borland</name>
> <phone>03-5353-9380</phone>
> </customer>
> データバインディングウィザードは、次のような
> インターフェースを自動生成します
>
> ICustomer = interface(IXMLNode)
> property id: Integer read Getid write Setid
> property name: DOMString read Getname write Setname;
> property phone: DOMString read Getphone write Setphone;
> function Getid: Integer;
> function Getname: DOMString;
> function Getphone: DOMString;
> procedure Setid(Value: Integer);
> procedure Setname(Value: DOMString);
> procedure Setphone(Value: DOMString);
> end;
> また、生成されたインターフェースは
> XMLDocumentコンポーネントとともにプログラムで用意に利用できます。
> データベースアプリケーションの中でXMLを使いたい場合は、
> XMLマッパーによって生成される変換ファイルを使う新しいコンポーネントを
> 利用できます。
>
0281Del厨房no71
NGNGttp://hpcgi2.nifty.com/KENCH/filer/dw.cgi?page=Main&dir=/Source/TMToken
これを uses して
var MToken:TMToken;
begin
MToken:=TMToken.Create('');
try
MToken.Text:=Memo1.Lines.Text;
Person.Name:= MToken.GetToken('Person.Name');
Person.Age :=StrToInt( MToken.GetToken('Person.Age') );
Person..Job.Title:=MToken.GetToken('Person..Job.Title');
finally MToken.Free;end;
end
MToken.ItemList で全トークンの一覧が出ますから
ギコBASICでやってるようなプロパティ検索処理を入れれば自動的にプロパティに入れるのは出来そうですね
0282Del厨房no71
NGNGgikoBas.pas の
function Bunkatu(str:string):TStringList;
|
|
function SetPropVar(obj:TObject;str:string;numVar:Variant):boolean;
|
end; までをコピペして
with MToken.ItemList do try
for i:=0 to Count-1 do begin
Token:=MToken.GetToken( Strings[i] );
SetPropVar( Form1 , Strings[i] , Token );
end;
finally free;end;
とすれば、Form1のpublishedなプロパティに一致する名前があれば自動的にセットされます
0283Del厨房no71
NGNG<Caption>フサギコ</Caption>
<Left>10</Left>
とやって フォームのキャプションと 左位置が変更された事を確認しました
0284Del厨房no71
NGNGgikoBas.pas の SetPropVarだと pulishedなプロパティのみにしか自動セット出来ません
ですから、フォームに貼り付けたボタンとかのCaptionには書き込めません
pulished なクラスに書き込むには
FieldAddress でも検索する必要があるようです
0285デフォルトの名無しさん
NGNG0286Del厨房no71
NGNGhttp://pc.2ch.net/test/read.cgi/prog/961558082/
の方に >>284 の改良情報を書き込んでおきました
0287デフォルトの名無しさん
NGNG0288デフォルトの名無しさん
NGNG壮大すぎるので却下。
0289デフォルトの名無しさん
NGNG次スレはそれっぽいタイトルで頼む。
0290デフォルトの名無しさん
NGNG0291デフォルトの名無しさん
NGNG0292デフォルトの名無しさん
NGNGここにソース置き場専用スレ立てる?
0293デフォルトの名無しさん
NGNG2chブラウザならどうだ?しかもマ板用。
具体的にはソースの強調表示機能つきのな。
どの言語で書かれたか判別するのは無理だろうから、
ユーザーが指定したレスないし選択した部分を強調。
0294デフォルトの名無しさん
NGNG未完成ならC#用あるよ。
0295デフォルトの名無しさん
NGNG最近ではC Builder Personal版無料にしなかったこと
いかに学生を取り込むかが将来使ってもらえるかの鍵となるのに…
(せめて学術関係者には無料とかすればよかったのに・・・)
VSのアカデミック版のあの価格設定及び上位版との機能の違いは正直うまいと思う。
VSアカデミックはいろんな言語ついて3万円。上位版との違いは使いやすいツールがあるか否か
Delアカデミック(Professional版及びその他)は…
機能
http://www.borland.co.jp/delphi/del6/features.html
価格
ttp://216.239.35.100/search?q=cache:4Dfe5oMeRdcC:www.borland.co.jp/sales/delphi.html+delphi++%83A%83J%83f%83~%83b%83N%81%40%89%BF%8Ai&hl=ja&lr=lang_ja
0296デフォルトの名無しさん
NGNGVSにはWindowsXPも付いてくる。
0297デフォルトの名無しさん
NGNGなんだかんだ言って自分が欲しいだけでしょ?
0298デフォルトの名無しさん
NGNG0299デフォルトの名無しさん
NGNGそれに BCC もあるんだし本気でやろうとするヤツには
十分すぎる環境だと思うけどね >>295
0300デフォルトの名無しさん
NGNG本気じゃない奴は学校からVS買わされます。
>>296
正直そのソース教えてください。VSまじでほすぃMEだから無理…?と思っていたので
0301デフォルトの名無しさん
NGNGMSDN付きならWin2KServerとXP Pro(開発用途での使用に限る)が付いてくるはず。
開発用途でマシンに負荷をかけるためにゲームを起動したり、
自前のクリップボードユーティリティのテストのためにワードやエクセル使っても良い。
\23kでOS+言語3(4)つ。お得過ぎ。
0302デフォルトの名無しさん
NGNG使う側としては、他の人が作ったコンポーネントは貼り付けて使えます?
…もし作れない&使えないなら、入門者からOOPを覚える機会を奪っているMSの飼い殺し作戦と認定する
0303デフォルトの名無しさん
NGNGSDKレベルでは作れるのでは?と個人的には認識。
0304デフォルトの名無しさん
NGNG大丈夫です。VB5 CCE がフリーで落ちてます!
0305デフォルトの名無しさん
NGNGまだ落ちてるの?あの体験版w
0306デフォルトの名無しさん
NGNG0307デフォルトの名無しさん
NGNG0308デフォルトの名無しさん
NGNGネタにマジレス、カコ悪い。
0309302=307
NGNG入門者にとって、RADでクラスが扱えるのは、クラスの意義を目に見える形で学んでいるようなものです。
コンポーネントを作るという作業はOOPやその言語を強制的に覚えさせられることになりますし、
人の作ったコンポーネントを使うということは使いやすいクラス設計を体感することになります。
でそれらが制限されているとすれば…>>302の結論となります。
…で、結局のとこどうなの?SDKレベルで作ったとして、それは取り込んで使えるわけ?
0310デフォルトの名無しさん
NGNG強制的に覚えさせられることになりますし、
↓
プログラムを作るという作業はOOPやその言語を
強制的に覚えさせられることになりますし、
0311デフォルトの名無しさん
NGNGusing System;
using System.Drawing;
using System.Reflection;
using System.Runtime.InteropServices;
using System.Windows.Forms;
using AxSHDocVw;
class BrowserForm : Form
{
AxWebBrowser webBrowser;
ToolBarButton back;
ToolBarButton forward;
ToolBarButton refresh;
ToolBarButton home;
ToolBar toolBar;
public BrowserForm() {
webBrowser = new AxWebBrowser();
webBrowser.Dock = DockStyle.Fill;
webBrowser.HandleCreated += new EventHandler(this.webBrowser_HandleCreated);
webBrowser.NewWindow2 += new DWebBrowserEvents2_NewWindow2EventHandler(this.webBrowser_NewWindow2);
webBrowser.TitleChange += new DWebBrowserEvents2_TitleChangeEventHandler(this.webBrowser_TitleChange);
back = new ToolBarButton("←");
forward = new ToolBarButton("→");
refresh = new ToolBarButton("更新");
home = new ToolBarButton("巣");
toolBar = new ToolBar();
toolBar.Appearance = ToolBarAppearance.Flat;
toolBar.ButtonClick += new ToolBarButtonClickEventHandler(this.toolBar_ButtonClick);
toolBar.Buttons.AddRange(new ToolBarButton[] { back, forward, refresh, home });
this.Size = new Size(768, 530);
this.Controls.AddRange(new Control[] { webBrowser, toolBar });
}
private void GoHome() {
object o = Missing.Value;
webBrowser.Navigate("http://pc.2ch.net/tech/", ref o, ref o, ref o, ref o);
}
0312デフォルトの名無しさん
NGNGprivate void webBrowser_HandleCreated(object sender, EventArgs e) {
this.GoHome();
}
private void webBrowser_NewWindow2(object sender, DWebBrowserEvents2_NewWindow2Event e) {
BrowserForm f = new BrowserForm();
f.Visible = true;
e.ppDisp = f.webBrowser.GetOcx();
}
private void webBrowser_TitleChange(object sender, DWebBrowserEvents2_TitleChangeEvent e) {
this.Text = e.text;
}
private void toolBar_ButtonClick(object sender, ToolBarButtonClickEventArgs e) {
ToolBarButton button = e.Button;
try {
if (button == back) {
webBrowser.GoBack();
}
else if (button == forward) {
webBrowser.GoForward();
}
else if (button == refresh) {
object o = Missing.Value;
webBrowser.Refresh2(ref o);
}
else if (button == home) {
this.GoHome();
}
}
catch (COMException) {
}
}
[ STAThread ]
public static void Main() {
Application.Run(new BrowserForm());
}
}
0313デフォルトの名無しさん
NGNGunit UMain;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, OleCtrls, SHDocVw, ComCtrls, ToolWin;
type
TForm1 = class(TForm)
ToolBar1: TToolBar;
BackButton: TToolButton;
ForwardButton: TToolButton;
RefreshButton: TToolButton;
GoHomeButton: TToolButton;
WebBrowser1: TWebBrowser;
procedure WebBrowser1NewWindow2(Sender: TObject; var ppDisp: IDispatch; var Cancel: WordBool);
procedure WebBrowser1TitleChange(Sender: TObject; const Text: WideString);
procedure FormCreate(Sender: TObject);
procedure RefreshButtonClick(Sender: TObject);
procedure GoHomeButtonClick(Sender: TObject);
procedure BackButtonClick(Sender: TObject);
procedure ForwardButtonClick(Sender: TObject);
private
{ Private 宣言 }
procedure GoHome;
public
{ Public 宣言 }
end;
var
Form1: TForm1;
0314デフォルトの名無しさん
NGNG{$R *.dfm}
procedure TForm1.GoHome;
begin
WebBrowser1.Navigate('http://pc.2ch.net/tech/');
end;
procedure TForm1.WebBrowser1NewWindow2(Sender: TObject; var ppDisp: IDispatch; var Cancel: WordBool);
begin
with TForm1.Create(Application) do
begin
ppDisp := WebBrowser1.OleObject;
Show;
end;
end;
procedure TForm1.WebBrowser1TitleChange(Sender: TObject; const Text: WideString);
begin
Caption := Text
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
GoHome
end;
procedure TForm1.RefreshButtonClick(Sender: TObject);
begin
WebBrowser1.Refresh2
end;
procedure TForm1.GoHomeButtonClick(Sender: TObject);
begin
GoHome
end;
procedure TForm1.BackButtonClick(Sender: TObject);
begin
WebBrowser1.GoBack
end;
procedure TForm1.ForwardButtonClick(Sender: TObject);
begin
WebBrowser1.GoForward
end;
end.
0315デフォルトの名無しさん
NGNGLeft = 192
Top = 107
Width = 696
Height = 480
Caption = 'Form1'
Color = clBtnFace
Font.Charset = SHIFTJIS_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Pゴシック'
Font.Style = []
OldCreateOrder = False
Position = poDefault
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 688
Height = 29
ButtonHeight = 20
ButtonWidth = 31
Caption = 'ToolBar1'
Flat = True
ShowCaptions = True
TabOrder = 0
0316デフォルトの名無しさん
NGNGLeft = 0
Top = 0
Caption = '←'
ImageIndex = 0
OnClick = BackButtonClick
end
object ForwardButton: TToolButton
Left = 31
Top = 0
Caption = '→'
ImageIndex = 1
OnClick = ForwardButtonClick
end
object RefreshButton: TToolButton
Left = 62
Top = 0
Caption = '更新'
ImageIndex = 2
OnClick = RefreshButtonClick
end
object GoHomeButton: TToolButton
Left = 93
Top = 0
Caption = '巣'
ImageIndex = 3
OnClick = GoHomeButtonClick
end
end
object WebBrowser1: TWebBrowser
Left = 0
Top = 29
Width = 688
Height = 424
Align = alClient
TabOrder = 1
OnTitleChange = WebBrowser1TitleChange
OnNewWindow2 = WebBrowser1NewWindow2
ControlData = {
4C0000001B470000D22B00000000000000000000000000000000000000000000
000000004C000000000000000000000001000000E0D057007335CF11AE690800
2B2E126208000000000000004C0000000114020000000000C000000000000046
8000000000000000000000000000000000000000000000000000000000000000
00000000000000000100000000000000000000000000000000000000}
end
end
0317デフォルトの名無しさん
NGNGこのとき、コンパイルルーチン(中間コード?)がリンクされて、
スタンドアロンコンパイラが作られるって事でしょうか?
0318デフォルトの名無しさん
NGNG0319デフォルトの名無しさん
NGNG開発向けじゃなく、既に出来あがったコードの清書に向いてるんじゃ?
プログラム考える時、変数名や関数名決めるより先に型決めるか?普通。
どちらも使ってるけど、明らかにPascal系のほうが、Cよりも
新しいプログラム書く時は生産効率良い。その代わり、CやC++で
清書しないとPascal系で書かれたコード、再利用するのは大変
コンポーネント化はともかく、再利用性(ライブラリ化)はC系のほ
うが遥かに優れてるようなきがする。
0320デフォルトの名無しさん
NGNGなに言っているのかわかりません。
0322デフォルトの名無しさん
NGNG何となくわかる。
String data
と
data :String
の差でしょ?
俺も久々にCファミリーの言語触って違和感感じた。
dataというString型変数。
と
String型のdataという変数。
頭の切り替えが必要だね。
0323デフォルトの名無しさん
NGNGprogram Dump;
{$APPTYPE CONSOLE}
uses Windows, SysUtils;
function GetAttribute(var F: Text): Word;
var
Info: CONSOLE_SCREEN_BUFFER_INFO;
begin
GetConsoleScreenBufferInfo(TTextRec(F).Handle, Info);
Result := Info.wAttributes
end;
procedure SetAttribute(var F: Text; Attr: Word);
begin
Flush(F);
SetConsoleTextAttribute(TTextRec(F).Handle, Attr)
end;
procedure WriteData(Data: array of Char; Next: Char);
var
I: Integer;
OrdAttr: Word;
begin
for I := Low(Data) to High(Data) do
Write(IntToHex(Ord(Data[I]), 2), ' ');
Write('': (16 - Length(Data)) * 3);
OrdAttr := GetAttribute(Output);
SetAttribute(Output, FOREGROUND_GREEN);
Write(': ');
SetAttribute(Output, OrdAttr);
for I := Low(Data) to High(Data) do
if Data[I] in [#$20..#$7e, #$80..#$fe] then
begin
Write(Data[I]);
if (I = High(Data)) and (Data[I] in LeadBytes) and (Next in [#$20..#$ff]) then
Write(Next)
end
else
begin
OrdAttr := GetAttribute(Output);
SetAttribute(Output, FOREGROUND_RED);
Write('.');
SetAttribute(Output, OrdAttr)
end;
WriteLn
end;
0324デフォルトの名無しさん
NGNGF: File;
Data: array[0..15] of Char;
Count, NextCount: Integer;
Next: Char;
begin
Assign(F, ParamStr(1));
FileMode := fmOpenRead or fmShareDenyNone;
Reset(F, SizeOf(Char));
BlockRead(F, Data, SizeOf(Data), Count);
BlockRead(F, Next, SizeOf(Next), NextCount);
while Count > 0 do
begin
WriteData(Slice(Data, Count), Next);
Count := 0;
if NextCount > 0 then
begin
Data[0] := Next;
BlockRead(F, Data[1], SizeOf(Data) - SizeOf(Char), Count);
Inc(Count);
BlockRead(F, Next, SizeOf(Next), NextCount)
end
end;
Close(F)
end.
0325デフォルトの名無しさん
NGNG色の変え方はよく分からん。
using System;
using System.IO;
using System.Text;
class BinaryDump {
public static void Main(string[] args) {
if (args.Length == 0) {
return;
}
using (Stream s = File.OpenRead(args[0])) {
byte[] buf = new byte[16];
int read = 0;
int index = 0;
while ((read = s.Read(buf, 0, buf.Length)) > 0) {
// バイトのインデックス表示
Console.Write("{0:X8}", index);
index += 16;
Console.Write(" ");
0326デフォルトの名無しさん
NGNG// 16進表示
for (int n = 0; n < read; n++) {
Console.Write("{0:X2}", buf[n]);
// 区切り文字の表示
if (n == 7) {
Console.Write('-');
}
else {
Console.Write(' ');
}
}
// 最終行の帳尻合わせ
for (int n = 16; n > read; n--) {
Console.Write(" ");
}
Console.Write(" ");
// 内容表示
string text = Encoding.GetEncoding("Shift_JIS").GetString(buf, 0, read);
for (int n = 0; n < text.Length; n++) {
// 制御文字の置き換え
if (Char.IsControl(text[n])) {
Console.Write('.');
}
else {
Console.Write(text[n]);
}
}
Console.WriteLine();
}
}
}
}
0327デフォルトの名無しさん
NGNG設計無しでコード書くんですか?
0328デフォルトの名無しさん
NGNGusing System;
using System.Runtime.InteropServices;
sealed class Interop {
// 標準出力のハンドル取得用
[DllImport("kernel32.dll")]
internal static extern IntPtr GetStdHandle(uint nStdHandle);
internal const uint STD_OUTPUT_HANDLE = unchecked((uint)-11);
// コンソールの情報取得用
[DllImport("kernel32.dll")]
internal static extern bool GetConsoleScreenBufferInfo(
IntPtr hConsoleOutput, ref CONSOLE_SCREEN_BUFFER_INFO lpConsoleScreenBufferInfo);
[StructLayout(LayoutKind.Sequential)]
internal struct CONSOLE_SCREEN_BUFFER_INFO {
public COORD dwSize;
public COORD dwCursorPosition;
public ushort wAttributes;
public SMALL_RECT srWindow;
public COORD dwMaximumWindowSize;
}
[StructLayout(LayoutKind.Sequential)]
internal struct COORD {
public short X;
public short Y;
}
[StructLayout(LayoutKind.Sequential)]
internal struct SMALL_RECT {
public short Left;
public short Top;
public short Right;
public short Bottom;
}
// 文字色設定用
[DllImport("kernel32.dll")]
internal static extern bool SetConsoleTextAttribute(IntPtr hConsoleOutput, ushort wAttributes);
internal const int FOREGROUND_GREEN = 0x0002;
internal const int FOREGROUND_RED = 0x0004;
}
0329デフォルトの名無しさん
NGNGusing System;
using A = Interop;
class Test {
public static void Main() {
IntPtr h = A.GetStdHandle(A.STD_OUTPUT_HANDLE);
A.CONSOLE_SCREEN_BUFFER_INFO info = new A.CONSOLE_SCREEN_BUFFER_INFO();
A.GetConsoleScreenBufferInfo(h, ref info);
ushort orgAttr = info.wAttributes;
A.SetConsoleTextAttribute(h, A.FOREGROUND_GREEN);
Console.Write("緑");
A.SetConsoleTextAttribute(h, A.FOREGROUND_RED);
Console.Write("赤");
A.SetConsoleTextAttribute(h, orgAttr);
Console.WriteLine("白");
}
}
0330デフォルトの名無しさん
NGNG0331デフォルトの名無しさん
NGNG↓こんな感じだす
interface
function FindExecutable(lpszFile, lpszDir, lpszResult: PAnsiChar): HINST; stdcall;
implementation
function FindExecutable; external shell32 name 'FindExecutableA';
0332323
NGNG>>330 function WWW(XXX: YYY): ZZZ; external 'DLL名' name '内部名'; …要するに大差無し。
0333デフォルトの名無しさん
NGNGほうほう。Declare Function〜みたいなものか。
0334デフォルトの名無しさん
NGNG0335デフォルトの名無しさん
NGNG取りあえずお手本を見せてくれ。
0336デフォルトの名無しさん
NGNG公開されてるならやってみたい。
0337323
NGNGC#, Delphi共通で使えるものが無いお題がいいな。
XMLデータベースなんかどうでしょう。DelphiにはMyBaseがあるし、.NETにも同様の機能があった筈。
…Excelのファイルフォーマットが公開されているのであればごめんなさい。
ところでC#でSliceやbuf[1]からの読み込みをどうやるのか見たくて出した先のお題なのですけれど、
使ってくれなかったので、誰か方法だけでも教えてくれませんか?
0338デフォルトの名無しさん
NGNGExcel2000使用。こういうのはブビの方がいいかもね。
using System;
using System.IO;
using System.Reflection;
using Excel;
class CSV2Excel {
public static void Main(string[] args) {
if (args.Length == 0) {
return;
}
string csv_name = Path.GetFullPath(args[0]);
string xls_name = Path.GetDirectoryName(csv_name) +
@"\" + Path.GetFileNameWithoutExtension(csv_name) + ".xls";
_Application app = null;
_Workbook book = null;
object o = Missing.Value;
try {
app = new ApplicationClass();
book = app.Workbooks.Open(csv_name, o, o, o, o, o, o, o, o, o, o, o, o);
book.SaveAs(xls_name, XlFileFormat.xlExcel7, o, o, o, o, 0, o, o, o, o);
}
catch (Exception x) {
Console.WriteLine(x.Message);
}
finally {
if (book != null) book.Close(o, o, o);
if (app != null) app.Quit();
}
}
}
0339デフォルトの名無しさん
NGNG0340デフォルトの名無しさん
NGNGXMLデータベースなら、ObjectSpaceという非公開のライブラリを使ったサンプルを前に作ってるよ。
とりあえずこんな感じ。
http://do.sakura.ne.jp/~junkroom/cgi-bin/megabbs/readres.cgi?bo=lounge&vi=1003826049&res=38&fi=no
http://do.sakura.ne.jp/~junkroom/cgi-bin/megabbs/readres.cgi?bo=lounge&vi=1003826049&res=39&fi=no
0341デフォルトの名無しさん
NGNGsplitならある。
0342デフォルトの名無しさん
NGNGbuf[1]からの読み込みならこんな感じ。
// 第2引数 : 読み込み開始位置
s.Read(buf, 1, buf.Length - 1);
0343デフォルトの名無しさん
NGNGprogram CSV2Excel;
{$APPTYPE CONSOLE}
uses ActiveX, SysUtils, Variants, ComObj;
var
F: TFileName;
Excel, Book: OleVariant;
begin
F := ExpandFileName(ParamStr(1));
CoInitialize(nil);
try
Excel := CreateOleObject('Excel.Application');
try
Book := Excel.Workbooks.Open(F);
Book.SaveAs(ChangeFileExt(F, '.xls'), $00000027);
Book.Close
finally
Excel.Quit
end
finally
CoUninitialize
end
end.
0344デフォルトの名無しさん
NGNG>>342 成程。ってリファレンス見ればわかる内容ですね。すいません。
0345デフォルトの名無しさん
NGNGOption Strict Off
Imports System
Imports System.IO
Imports Microsoft.VisualBasic
Class CSV2Excel
Public Shared Sub Main(ByVal args As String())
Dim csv As String = Path.GetFullPath(args(0))
Dim xls As String = Path.GetDirectoryName(csv) + _
"\" + Path.GetFileNameWithoutExtension(csv) + ".xls"
Dim app As Object
Try
app = Interaction.CreateObject("Excel.Application")
Dim book As Object = app.WorkBooks.Open(csv)
book.SaveAs(xls, &H0027)
book.Close()
Catch x As Exception
Console.WriteLine(x.Message)
Finally
If Not app Is Nothing Then
app.Quit()
End If
End Try
End Sub
End Class
0346デフォルトの名無しさん
NGNGimport System;
import System.IO;
var args : String[] = Environment.GetCommandLineArgs();
var csv : String = Path.GetFullPath(args[1]);
var xls : String = Path.GetDirectoryName(csv) + "\\" + Path.GetFileNameWithoutExtension(csv) + ".xls";
var app : Object;
try {
app = new ActiveXObject("Excel.Application");
var book : Object = app.WorkBooks.Open(csv);
book.SaveAs(xls, 0x0027);
book.Close();
}
catch (x : Exception) {
Console.WriteLine(x.Message);
}
finally {
if (app != null) app.Quit();
}
0347デフォルトの名無しさん
NGNGここに載ってるDelphiのコードってPersonalで全部動くの?
0348デフォルトの名無しさん
NGNG変なコンポーネント使っている場合を除いて動くだろう。
0349デフォルトの名無しさん
NGNGお前らも代わりに.NETのランタイムぐらい入れろ(゚Д゚)ゴルァ
0350デフォルトの名無しさん
NGNGお前らって誰?
0351デフォルトの名無しさん
NGNGDel厨
0352デフォルトの名無しさん
NGNG0353デフォルトの名無しさん
NGNG0354デフォルトの名無しさん
NGNGページの移動とか面倒でない?
0355デフォルトの名無しさん
NGNG0356デフォルトの名無しさん
NGNGDelphi知らないんですが、どのへんが奇妙ですか?
0357デフォルトの名無しさん
NGNG.NETでのSliceの代わりはArray.Copy
0358デフォルトの名無しさん
NGNGエラーになるとか、それどころか片方だけ途中で改行すると
だめだとか、ちょっと作りが荒いところがあるな。
0359デフォルトの名無しさん
NGNG↑これにはすごい違和感がある。C系言語やってる人間には。
0360糞スレと思って見てみたら
NGNG0361デフォルトの名無しさん
NGNGコードが出てくると黙っちゃうからねえ。
0362デフォルトの名無しさん
NGNG//これ使えなかった?>Delphi
{これがコメントはたしかに違和感あり}
0363デフォルトの名無しさん
NGNGそれに準拠するには{こんなコメントをサポートしないといけないのかも。}
既にむちゃくちゃ独自仕様だからこだわること無いと思うけど。
0364デフォルトの名無しさん
NGNG文字列の '〜'
end だったり end; だったり end. だったり迷う
0365デフォルトの名無しさん
NGNGend elseのように
一本の文として繋がるとこには置かない。
0366デフォルトの名無しさん
NGNGVBみたいに代入と比較の=が同じなのはなんかやだし。
分けてるって事は意味解析も必要なさそう。
'〜'←unix系のsh使いならそれほど違和感ないかも。
end←そもそもbegin〜endが気持ち悪いね。
0367デフォルトの名無しさん
NGNGとりあえずコンソールアプリを作ってみたものの、
readlnの仕様とかヘルプ見てもよくわかんなかった。
整数を期待する入力にアルファベット入力してみたら、あっさり死んで萎え〜。
0368デフォルトの名無しさん
NGNG0369デフォルトの名無しさん
NGNG0370デフォルトの名無しさん
NGNGクラスに属さないグローバル関数というのもいやん。
0371みの
NGNG0372出川
NGNG0373みの
NGNG・・・・・・・・・せいかい!
0374デフォルトの名無しさん
NGNG追いつかれ追い越され状態なのを確認するスレです。
0375デフォルトの名無しさん
NGNG0376デフォルトの名無しさん
NGNGSDK+エディタでゴリゴリ?
0377デフォルトの名無しさん
NGNGC#のIDEってフリーカーソルに出来るのでしょうか?
0378デフォルトの名無しさん
NGNGなんでそうやって無理するの?
い・い・か・げ・ん・直せ>Borland
0379デフォルトの名無しさん
NGNGで、どうやるの?
0380デフォルトの名無しさん
NGNGごめん、>>369だった。
0381デフォルトの名無しさん
NGNGttp://homepage1.nifty.com/fuu/
フリーカーソル反対!
0382デフォルトの名無しさん
NGNGなにがフリーカーソルで、なにがそうでなくて、
フリーカーソルの利点と欠点をだれか教えてくれ。
0383デフォルトの名無しさん
NGNG反フリーカーソル派 = ブリーフ派
0384デフォルトの名無しさん
NGNG(・∀・)イイ!
0385デフォルトの名無しさん
NGNG>>367 例外が出るのを 死ぬと表現するのは違和感あるよ
0386デフォルトの名無しさん
NGNG0387デフォルトの名無しさん
NGNGそういえばプロトタイプ宣言の仮引数の名前が違っただけで
エラーになるとか、それどころか片方だけ途中で改行すると
だめだとか、ちょっと作りが荒いところがあるな。
*)
ワラタ、けなすならPascalの生まれた経緯と歴史くらい勉強してくれ。
0388デフォルトの名無しさん
NGNGPascalは歴史的にキーボードへの配慮で (* = { で (. = [ となってます。
仮引数名は上下で合せないといけませんが(つーか変えたいなんて言ってる人初めて見ました)、改行は別におっけーだった筈…。
で、C#のIDE(VisualStudio.NET)はフリーカーソルにできますか?(←知りたい)
.NET SDKは英語版の正式版が出た段階で入れ、日本語版、SP 1とキッチリ追いかけてますよ〜。
次のお題は…Windows APIだけで作られた (DelphiならVCL/CLXを、C#ならWindows.Formsを使わずに)
保存と読み込みだけできる簡易メモ帳、とかどうでしょう?
(Delphiに有利過ぎ?でもXML周辺は明らかにC#有利でしたからこの位…w)
0389デフォルトの名無しさん
NGNG>で、C#のIDE(VisualStudio.NET)はフリーカーソルにできますか?(←知りたい)
フリーカーソルじゃないけどなかなかインテリジェント。
0390Delフサギコ ◆zE1iiRdQ
NGNG〜′,,,,,,,ミ,,゚Д゚彡< ここで動いてるC#コードって
UU""" U U \Pascal.NETでも同じように記述できるん?
0391デフォルトの名無しさん
NGNG0392デフォルトの名無しさん
NGNGサンクスコ
大分使いやすくなった。
VBの場合予約語や宣言した変数は入力すると勝手に大文字小文字をうまく合わせてくれるじゃん?
Delphiにもその機能があったらいいなぁと思う。
小文字だけはソースが汚いし、Shift押してやるのも面倒。
0393Delフサギコ ◆zE1iiRdQ
NGNG〜′,,,,,,,ミ,,゚Д゚彡< >>392 賛成でし。
UU""" U U \ 有名なG-エキスパってアドインで対応できんのかな?
BorlandはIndyとかと同じように
ユーザーサイドの周辺ソフト&ライブラをガシガシ標準環境に
取り込んで欲しいです。
そうしないと、マンパワーでどうしたってMSには勝てんだろうし。
フリカ無効化アドインとかも
標準でついてるべき機能だよなー
0394デフォルトの名無しさん
NGNGVB.NETってそれ無くなってない?
0395デフォルトの名無しさん
NGNG0396デフォルトの名無しさん
NGNG0397デフォルトの名無しさん
NGNG起動がワンテンポ遅れる感じ
ただし遅いPCだけかもしれないけど(漏れのはP�V650だからはっきり分かる)
0398デフォルトの名無しさん
NGNG常時ロードされるようになれば
アプリの起動が速くなったりして。
Sleepし続けるアプリでも常駐させとけば?
0399デフォルトの名無しさん
NGNG0400デフォルトの名無しさん
NGNGC#版これから作るけど、多分ここに載せきれない分量になるよ。
どこかアプできるとこない?
0401デフォルトの名無しさん
NGNG置き場所作ってみました
http://do.sakura.ne.jp/~junkroom/cgi-bin/megabbs/readres.cgi?bo=lounge&vi=1021888173&res=1
0402デフォルトの名無しさん
NGNG"0〜9 + - * / ( ) "を含む 文字列を引数にして 演算し
整数又は浮動小数点数を返す関数を書け
なんか .NET ってそういうの得意そうじゃない?
0403デフォルトの名無しさん
NGNG>なんか .NET ってそういうの得意そうじゃない?
依怙贔屓と取ってよろしいか?
0404デフォルトの名無しさん
NGNGjscript.netのevalのこと?
0405デフォルトの名無しさん
NGNGimport System;
var args : String[] = Environment.GetCommandLineArgs();
Console.WriteLine(eval(args[1]));
0406デフォルトの名無しさん
NGNGつか、Delphiの力って大体把握してるから、
.NETで書くとどうなるかって方が興味深い・・・。
0407デフォルトの名無しさん
NGNGそのうち配列の途中に要素を挿入するアルゴリズム(藁
を知らないドットネッターなんてのが出てきそうだな。
0408デフォルトの名無しさん
NGNG0409デフォルトの名無しさん
NGNGDelphiのコード、やっぱりこの板のどこかに書いた筈・・・
転載されてた
http://pc.2ch.net/tech/kako/1003/10035/1003559977.html
の 4
0410デフォルトの名無しさん
NGNG>>401のとこにソースを置きたいのですが、あっちはタブとか空白とかはどうなるのでしょう。
やっぱり全角空白に直さないと駄目?
0411デフォルトの名無しさん
NGNG0412400
NGNGhttp://do.sakura.ne.jp/~junkroom/cgi-bin/megabbs/readres.cgi?bo=lounge&vi=1021888173&res=2&fi=no
0413388=410
NGNGhttp://do.sakura.ne.jp/~junkroom/cgi-bin/megabbs/readres.cgi?bo=lounge&vi=1021888173&res=3&fi=no
無駄にUNICODEアプリケーション(w
*.exeサイズ、ランタイム不要独立実行で19kバイト。DelphiはSysUtilsを使わなければ最小です。(これだけはC++にも負けない)
C#メモ帳試してみます。機能で負けてたら追加するかも。
0414デフォルトの名無しさん
NGNGhttp://www.zdnet.co.jp/enterprise/0205/20/02052001.html
0415デフォルトの名無しさん
NGNGしかもヘッダの部分も自前で用意しなきゃならないし。
0416デフォルトの名無しさん
NGNGWindows, CommDlg, Messages;
を禁止されてるようなものか。
0417デフォルトの名無しさん
NGNGN88-BASIC→BorlandのIDEと使ってきたので、
VZエディタとか使い始めたとき、めちゃ違和感があった。
学者系が非フリーカーソル、
ホビー系はフリーカーソルなのかな?
MS-DOSのラインエディタやIBMのXエディタあたりが
非フリーカーソルの祖先なのでしょうかね。
0418デフォルトの名無しさん
NGNG>学者系が非フリーカーソル、
Pascalは教育用言語ですが何か?
0419教育用言語≠ObjectPascal
NGNG0420デフォルトの名無しさん
NGNGだから教育用途は目指していなかったのでは?
0421デフォルトの名無しさん
NGNG0422デフォルトの名無しさん
NGNGあるけど、その前にWindows派だったからメモ帳がデフォルト。
確か一太郎のフリーカーソルはあんまり違和感なかったかな?
0423デフォルトの名無しさん
NGNGただ十字キーを連打しなければいけなくなるだけじゃない?
0424デフォルトの名無しさん
NGNG気が遠くなってきた。
β1の頃ならまだ楽だったんだけど・・・。
Microsoft.Win32.Interop.dll があったから。
0425400
NGNG0426デフォルトの名無しさん
NGNG私は、左端はエンターキーもしくはHOME CLRキー、右端はヘルプキー
ですな。
0427デフォルトの名無しさん
NGNG0428デフォルトの名無しさん
NGNGそういう考え方もあるね。
フリーカーソルの方が良いと思ってたけど、
どっちが良いのかはユーザ次第ってことか。
0429デフォルトの名無しさん
NGNG改行マークを表示できないエディタならフリーカーソルがいいです。
ですから、Delphiのエディタがフリーカーソルなのはまあ賛成。
VC++ or VBのエディタも、フリーカーソルにするか改行を表示するかどっちかして欲しい…
0430デフォルトの名無しさん
NGNGBorlandのは、おかしいよ・・・
0431デフォルトの名無しさん
NGNG0432デフォルトの名無しさん
NGNGだからOFFで使っています。
0433デフォルトの名無しさん
NGNGオートインデントはかなり便利だと思うが。
構造が入り組んでくると、わざわざ自分でインデントするの大変だよ。
0434400
NGNGhttp://do.sakura.ne.jp/~junkroom/cgi-bin/megabbs/readres.cgi?bo=lounge&vi=1021888173&res=4&fi=no
0435デフォルトの名無しさん
NGNGhttp://do.sakura.ne.jp/~junkroom/cgi-bin/megabbs/readres.cgi?bo=lounge&vi=1021888173&res=5&fi=no
0436デフォルトの名無しさん
NGNG囚人のジレンマのアプリケーションフレームワークはどうよ?
0437デフォルトの名無しさん
NGNG0438デフォルトの名無しさん
NGNG0439デフォルトの名無しさん
NGNGその時点で買う気無くなったな。
VisualC++しかないんかなやっぱり。
スレ違いでスマソ。
0440デフォルトの名無しさん
NGNG禿同。やっぱりDelphiダヨネ!
0441デフォルトの名無しさん
NGNGDelphi、すごくいいと思うんだけど、高すぎる。
学割で数万とか有り得ない。こんな高いもん買えん。
Personal版は制限がきつくてやってられんし。
0442デフォルトの名無しさん
NGNG0443デフォルトの名無しさん
NGNG0444デフォルトの名無しさん
NGNG古巣の基調講演に登場
http://www.zdnet.co.jp/enterprise/0205/21/02052101.html
これ見て気になったんだけど、
>2003年にはコードネームで「Galileo」と呼ばれ,.Net Frameworkをフルサポート
>したDelphiも登場する。
ということは、今年出るDelphi.NETは。。。
0445デフォルトの名無しさん
NGNG情報サンクス
バージョンアップは1回見送るのが正解かな
0446デフォルトの名無しさん
NGNG0447デフォルトの名無しさん
NGNG0448デフォルトの名無しさん
NGNG0449デフォルトの名無しさん
NGNGえっらそうに。
0450デフォルトの名無しさん
NGNG悔しいのか?プププ
0451デフォルトの名無しさん
NGNG0452デフォルトの名無しさん
NGNG>Personal版は制限がきつくてやってられんし。
具体的に。
学生がデータベースぐりぐりアクセスって考えられないんだけど。
0453Delフサギコ ◆zE1iiRdQ
NGNGミ ゚Д゚彡
〜ミ,,,,uuミ 正直、MSILコンパイラだけとは...チェッ
Personalが制限がキツイとか言う厨はほっとけ。
0454デフォルトの名無しさん
NGNG当分Delphiは手を出す必要はないな。
0455デフォルトの名無しさん
NGNG機能的に、じゃなくて、ライセンス的に。
商用・業務アプリケーションの開発はできません。
とあるが、なんでこういうわけの分からない制限つけるかね。
0456デフォルトの名無しさん
NGNGというより.NETならDelphiは必要ないじゃん(C#があるさ)
漏れは.NETできない環境のためにDelphiを使うと思うよ
0457デフォルトの名無しさん
NGNG0458デフォルトの名無しさん
NGNG0459デフォルトの名無しさん
NGNG0460デフォルトの名無しさん
NGNG0461デフォルトの名無しさん
NGNGというかよく知らずに作ってますけど囚人のジレンマフレームワークってこんなのでいいの?
http://do.sakura.ne.jp/~junkroom/cgi-bin/megabbs/readres.cgi?bo=lounge&vi=1021888173&res=6
0462デフォルトの名無しさん
NGNGネイティブを対象としたコンパイラと、マネージド環境を対象としたコンパイラを比べ、
片方が片方の環境に対応しないから、駄目って、それは判断基準が違う。
DelphiでASP.NETのコードは書けないし、C#/VB.NETでWindowsフックDLLは書けない。何か問題が?
(マネージドコードではそれ専用に作られたC#が最適なのはわかりきっているので)
むしろDelphi.NETはManaged C++のようになって欲しいと思うのは僕だけ?
ネイティブとの仲介に使える言語がManaged C++だけというのは辛すぎる気がしてるのでObjectPascalで書けたら…
Delphi 7のMSILコンパイラって、詳細どうなんでしょ。
0463デフォルトの名無しさん
NGNG.NETではJNIほど難しくありませんよ
0464デフォルトの名無しさん
NGNG0465デフォルトの名無しさん
NGNG>商用・業務アプリケーションの開発はできません。
>とあるが、なんでこういうわけの分からない制限つけるかね。
もっとも低機能なpersonalですらまともな業務用アプリケーションが構築できてしまうからです。
0466デフォルトの名無しさん
NGNGLoadLibraryしてGetProcAddressできたらmanagedの意味がねーだろ!
0467デフォルトの名無しさん
NGNG0468デフォルトの名無しさん
NGNG無知の知という言葉を送ろう。CLRでWindowsフックDLL書けますよん。
対象が違うという議論はMC++とC#にはあてはまるけど、C#とDelには
あてはまらんよね。もともとDelは打倒VBで作られたんだから、C#と
目標が同じであるのは明白であろう。
0469デフォルトの名無しさん
NGNG>CLRでWindowsフックDLL書けますよん
教えて!!
>Delは打倒VB
Delphiのいいところは、VBのような記述を、C++と同じ性能同じレベルで書ける、というところにあると思っていますので、
むしろずっとネイティブでいて欲しいと思う自分。
0470デフォルトの名無しさん
NGNG0471デフォルトの名無しさん
NGNGC#だけでシステムフックができるの?
0473デフォルトの名無しさん
NGNGIL変更すればできるらしい。詳細は忘れた。(w
>>472
そりはローカルフックでは?
0474デフォルトの名無しさん
NGNGく( ´∀`) テヘッ
0475デフォルトの名無しさん
NGNGメソッドのエクスポートの仕方。
http://discuss.develop.com/archives/wa.exe?A2=ind0204b&L=dotnet&F=&S=&P=78832
フィールドのやり方はいまだにわからん。
0476デフォルトの名無しさん
NGNGMicrosoft C# Microsoft Visual Studios Borland Delphi?
0477デフォルトの名無しさん
NGNG0478デフォルトの名無しさん
NGNGVCLは非劣化情報なのでコピーとっとけば死滅しません。
0479デフォルトの名無しさん
NGNG0480デフォルトの名無しさん
NGNG.NETをインストールしてないと動かないの?
それとも、何かDLLだけインストールすれば動くようになるの?
0481デフォルトの名無しさん
NGNG0482デフォルトの名無しさん
NGNGJavaと一緒?
0483デフォルトの名無しさん
NGNGDelphiのクソ使いにくいこんなの業務に使えるのかって
言語仕様がC++になることで解消されてる。
0484デフォルトの名無しさん
NGNG0485デフォルトの名無しさん
NGNG無くても書けるがあると楽だ。
VCLだけだと物足りない。
0486485
NGNG0487461
NGNG0488デフォルトの名無しさん
NGNGフレームワークの意味がわからなかったんだよ。
きっとVB上がりばっかリだからクラスなんて作ったことないだろうな。
というわけでDelphi=Object Pascalユーザーの圧勝。
0489デフォルトの名無しさん
NGNGフレームワークって何ですか?ぜひ教えてください。
>>461 さんのソースはどのへんがフレームワークなんですか?
0490デフォルトの名無しさん
NGNGDelphiにも欲しいぞ。
0491デフォルトの名無しさん
NGNG本人がそう言ってるところ。
0492デフォルトの名無しさん
NGNG今時、クラスライブラリのないOOPLや
STLのないテンプレートなどには
全く存在価値がありませんが?
0493デフォルトの名無しさん
NGNG0494デフォルトの名無しさん
NGNGそれだけポリシーがない環境ということ。
0495デフォルトの名無しさん
NGNG0496デフォルトの名無しさん
NGNG0497デフォルトの名無しさん
NGNGhttp://ascii24.com/news/i/topi/article/2002/05/23/635945-000.html
0498デフォルトの名無しさん
NGNG0499デフォルトの名無しさん
NGNG0500デフォルトの名無しさん
NGNG駄目じゃん(藁
0501デフォルトの名無しさん
NGNG駄目じゃん(藁
0502デフォルトの名無しさん
NGNG0503デフォルトの名無しさん
NGNGイタタタタ
0504デフォルトの名無しさん
NGNGこれはVBの悪夢の再来です。
0505デフォルトの名無しさん
NGNG.NETの基礎の基礎。アセンブリ管理機構すら勉強してないアフォの発言に見えるな。
0506デフォルトの名無しさん
NGNGでもさDelphi.NETついてもランタイム要るんだろ?
駄目じゃん(藁
0507デフォルトの名無しさん
NGNG0508デフォルトの名無しさん
NGNGhttp://www.google.co.jp/search?hl=ja&q=%83A%83Z%83%93%83u%83%8A%8A%C7%97%9D%8B@%8D%5C
0509デフォルトの名無しさん
NGNG0510デフォルトの名無しさん
NGNGでもさお前ついてもランタイム要るんだろ?
駄目じゃん(藁
0511デフォルトの名無しさん
NGNG0512デフォルトの名無しさん
NGNG>>508から飛んで勉強しとこう。
0513デフォルトの名無しさん
NGNG駄目じゃん(藁
0514デフォルトの名無しさん
NGNG・キーワードに誤字・脱字がないか確かめてください。
・違うキーワードを使ってみてください。
・より一般的な言葉を使ってみてください。
「アセンブリ管理機構」 は誤字・脱字があるか、一般的でないらしい
どうすればアフォから脱出できますか
0515Delフサギコ ◆zE1iiRdQ
NGNG∧,,∧ /まづは
ミ,,゚Д゚彡< 2chの情報を
_φ__⊂ミ_ \鵜呑みにしないことから
/旦/三/ /| はじめなさい。
| ̄ ̄ ̄ ̄ ̄| |
| 愛媛ミ力ソ .|/
 ̄ ̄ ̄ ̄ ̄
0516デフォルトの名無しさん
NGNG∧_∧ / ̄ ̄ ̄ ̄ ̄
( ´∀`)< ・・・
( ) \_____
| | |
(__)_)
0517デフォルトの名無しさん
NGNG0519デフォルトの名無しさん
NGNGミ,,゚Д゚彡フサギコのフサフサDelphi談話室�B
http://pc.2ch.net/test/read.cgi/tech/1021554929/
0520461
NGNGクロスプラットフォームもサーバーサイドもできるし、ランタイム要らないし軽々動くもん…と強がりを言ってみる。
フレームワークというのは、枠組みとなるライブラリって解釈でいいと思います。
Windows.Formsを一行も変更せずに楽々ウィンドウアプリケーション作れるでしょ?
同様、DilemmaFrame.pas/DilemmaConsole.pasを一行も変更せずに囚人を作って試せる
構造にしたので、これらをフレームワークと呼んでもいいかな?と手前勝手な解釈ながら。
Delphi.NETが屑でも、ネイティブはDelphi、.NETはC#と割り切って使うだけ(Delphi.NET最強ならそれが一番いいが)
と思っているので、ObjectPascalとC#で同じ処理を行うコードを見たいと思ってます。さあ出せ(w
トカカイテオイテバグガアッタラハズカシイノデワリビイテヨンデクダサイ
0521デフォルトの名無しさん
NGNGそのターゲット上で実行するときだけランタイム不要にする。
他の環境は要ランタイムってできないの?
0522デフォルトの名無しさん
NGNGって言うかJIT、PreJITがあるから。
0523デフォルトの名無しさん
NGNG0524デフォルトの名無しさん
NGNGその前にJITって何かわかってる?
0525デフォルトの名無しさん
NGNGDel厨に分かるわけないだろ。(嘲笑激藁
0527デフォルトの名無しさん
NGNG0528デフォルトの名無しさん
NGNG0529デフォルトの名無しさん
NGNG0530デフォルトの名無しさん
NGNG0531523
NGNGだからね、必要なJITコンパイラを exe につけて、
実行時に中間コードをコンパイルして実行するの!
もぉ!
0532デフォルトの名無しさん
NGNG0533デフォルトの名無しさん
NGNG0534デフォルトの名無しさん
NGNG0535デフォルトの名無しさん
NGNG駄目じゃん(藁
0536デフォルトの名無しさん
NGNG0537デフォルトの名無しさん
NGNG0538デフォルトの名無しさん
NGNG使ったことないけど。
0539デフォルトの名無しさん
NGNG0540デフォルトの名無しさん
NGNG0541デフォルトの名無しさん
NGNG0542デフォルトの名無しさん
NGNG駄目じゃん(藁
0543デフォルトの名無しさん
NGNG.NET Framework に加えて、Delphi.NET 独自のランタイムがいる、ってこと?
0544デフォルトの名無しさん
NGNG0545デフォルトの名無しさん
NGNG>Delphiにランタイムがいるのは許せない。
頭冷やせ。
0546デフォルトの名無しさん
NGNG0547デフォルトの名無しさん
NGNGDelphi.NETはランタイムに依存します。
どうよ?
0548デフォルトの名無しさん
NGNG.NET を 付 け や が れ
0549デフォルトの名無しさん
NGNGそれは他の.NETでも同じこと。
どうせ他のソフトにだってdllの一つや二つ付いてくる。
ランタイム=遅い、DLL HELL
って従来のステレオタイプな考えは.NETでは恥ずかしい。
0550デフォルトの名無しさん
NGNG0551デフォルトの名無しさん
NGNGDelphiはDLLに依存しないネイティブコードが売りだということ。
0552デフォルトの名無しさん
NGNGひねくれ者だな。
0553デフォルトの名無しさん
NGNG駄目じゃん(藁
0554デフォルトの名無しさん
NGNGどうダメか説明してくれ。
後、ランタイムとクラスライブラリdllの違いも説明してくれ。
(その文章書いてるってことはわかってないんだろうけど(激藁嘲笑。)
0555デフォルトの名無しさん
NGNG.NETでデフォルトでついてくるならまだしも、Borland製じゃね。
0556デフォルトの名無しさん
NGNGそんなアプリ俺は使わない。
0557デフォルトの名無しさん
NGNGDelphi.NETの売りは何なのか?
0558デフォルトの名無しさん
NGNGじゃあ君はdll使うアプリはいっさい使わないんだね。ご苦労様。
0559デフォルトの名無しさん
NGNG数ヶ月前は.NETをボロクソに言ってたくせに。(w
0560デフォルトの名無しさん
NGNG今では何か勘違いしているバカを矯正するので大変だよw
0561デフォルトの名無しさん
NGNG駄目じゃん(藁
0562デフォルトの名無しさん
NGNGそんな何回も同じもの張るなよ。
0563デフォルトの名無しさん
NGNGブビ厨に教わった方がいいかもね。(w
0564デフォルトの名無しさん
NGNGDelphiを使う意味って何?
0565デフォルトの名無しさん
NGNGVB.NET を使う意味って何?
Delphi を使う意味って何?
0566デフォルトの名無しさん
NGNG.NET Frameworkを築いた言語であること。
>VB.NET を使う意味って何?
世界で最も使われている言語あること。
>Delphi を使う意味って何?
知らん。
0567デフォルトの名無しさん
NGNG↓
過去のDelphi資産がすべてあぼーん
↓
だから今のうちに移行の準備しとけよ
VBと同じ手口じゃん(プッ
0568デフォルトの名無しさん
NGNG0569デフォルトの名無しさん
NGNG0570デフォルトの名無しさん
NGNG0571デフォルトの名無しさん
NGNGCPU IntensiveなものはJITされるからあんまり変わらん気がする
0572デフォルトの名無しさん
NGNGJava vs C# vs その他。みたいな。
0573デフォルトの名無しさん
NGNG単純コードで C#が25%増し程度 再帰を使うコードでも倍程度しか時間がかからない
0574デフォルトの名無しさん
NGNGどこのスレか思い出せませんか?
見てみたい。
.NET 関連スレかな。
0575転載
NGNGこれだとだいたい倍近く差が出る。
procedure TForm1.Button2Click(Sender: TObject);
function func(a:Integer):Integer;
var i:integer;
begin
Result:=0; if a<1 then exit;
Result:=1; if a<2 then exit;
for i:=1 to a-1 do Result:=Result+func(a-i)+func(i);
end;
var StartTime:int64;
begin
StartTime:=GetTickCount;
func(19);
Memo1.Lines.Add(format('%10.2fsec',[(GetTickCount-StartTime)/1000]) );
end;
private int func(int a)
{
if (a<1)return 0;
if (a<2)return 1;
int r=1;
for(int i=1;i<a;i++)r += func(a-i)+func(i);
return r;
}
private void button2_Click(object sender, System.EventArgs e)
{
DateTime stim = DateTime.Now;
func(19);
textBox1.AppendText( "\x0d\x0a"+((DateTime.Now.Ticks-stim.Ticks)/10000000.0).ToString("f") );
}
0576デフォルトの名無しさん
NGNG0577デフォルトの名無しさん
NGNG根拠もなしにDel厨がどうこう言うやつが一番ダメ
>>570
起動する時がもっさりしている位かな、気になるのは
0578デフォルトの名無しさん
NGNG0579デフォルトの名無しさん
NGNGDelphi not yet
0580デフォルトの名無しさん
NGNGしつもん!
どうしてDelphi側はイベントプロシージャなんですか?
条件を同じにするならどちらもコンソールにするかC#側をWindows.Forms仕様に書き換えてもいいと思います。
0581デフォルトの名無しさん
NGNGよく見ろ
0582デフォルトの名無しさん
NGNG0583Delフサギコ ◆zE1iiRdQ
NGNGピッ! ∩∧,,∧ /先生、>>580君のシツモソの
ミ,,゚Д゚彡< 意味がチョットわからません
ミ ミ \_____
\ ̄ ̄ ̄ ̄ ̄U ̄ ̄\
||\ \
||\|| ̄ ̄ ̄ ̄ ̄ ̄ ̄|| ̄
|| || ̄ ̄ ̄ ̄ ̄ ̄ ̄||
.|| ||
0584デフォルトの名無しさん
NGNG0585デフォルトの名無しさん
NGNGごめんなさい。
0586デフォルトの名無しさん
NGNGやっぱりDelphiはどこからどこまでがブロックか分かりづらい。
begin〜endはダメだなこりゃ。
0587デフォルトの名無しさん
NGNGそのための強調表示です。
0588デフォルトの名無しさん
NGNGprivate void button2_Click(object sender, System.EventArgs e)
↑俺にはイベントハンドラにしか見えんのだが
実際、フォームにボタンを貼り付けてテストしたんだけど・・・
0589デフォルトの名無しさん
NGNGOracleのストアドとか書いたこと無いでしょ
(あれ?どこかでも同じことを書いたような・・・)
0590デフォルトの名無しさん
NGNG強調表示しないと分からないということがクソなんだよ。
0591デフォルトの名無しさん
NGNGコンパイル速度も実行速度もC#の圧勝だNE!
0592デフォルトの名無しさん
NGNG真に受ける厨房がたまにいるかも知れんから
わざと間違った情報を書き込むのは控えよう
0593デフォルトの名無しさん
NGNGオマエガナー(w
0594デフォルトの名無しさん
NGNGDelphi 17.78秒
C# 30.83秒
0595Delフサギコ ◆zE1iiRdQ
NGNG∧,,∧ サッ /強調表示とか言う奴
ミ,,゚Д゚ミ < 逝ってよし
⊂ Om \
ミ、,, ミ,
.しヾJ
>>575のコードのインデントはこう
(インデントは全角スペでヨロシコ)
procedure TForm1.Button2Click(Sender: TObject);
function func(a:Integer):Integer;
var i:integer;
begin
Result:=0; if a<1 then exit;
Result:=1; if a<2 then exit;
for i:=1 to a-1 do Result:=Result+func(a-i)+func(i);
end;
var StartTime:int64;
begin
StartTime:=GetTickCount;
func(19);
Memo1.Lines.Add(format('%10.2fsec',[(GetTickCount-StartTime)/1000]) );
end;
関数内関数くらい、氏っとけ
0596デフォルトの名無しさん
NGNGVB.NETですらサポートしたのに。(w
0597デフォルトの名無しさん
NGNGC#とDelphiを比較するなら両方ともあるていど知っている必要がある
このスレに君のような初心者は不要
0598デフォルトの名無しさん
NGNGどこがObject Pascalなんだろう?D.NETどうなることやら。
0599デフォルトの名無しさん
NGNGアフォ?
0601デフォルトの名無しさん
NGNGイタイからもう来るな。
0602デフォルトの名無しさん
NGNGさすがDel厨
0603デフォルトの名無しさん
NGNGミ,,゚Д゚彡フサギコのフサフサDelphi談話室�B
http://pc.2ch.net/test/read.cgi/tech/1021554929/
0604デフォルトの名無しさん
NGNG>>575のベンチマークはインチキです。
C#の方はDebugモード&最適化なしでコンパイルしています。
こういう偽の情報にはくれぐれも注意しましょう。
C#の方がコンパイルも実行も高速です!
0605デフォルトの名無しさん
NGNG0606デフォルトの名無しさん
NGNG>C#の方はDebugモード&最適化なしでコンパイルしています。
出てくるMSILはDebug Releaseとも同一だ
と日系BPパソコンベストムック、始めようC#のP20のコラムに書いてある。
取り合えず論拠もないのに騒ぐな。
0607デフォルトの名無しさん
NGNG「シングルスレッドの方が高速です」と言ってるとはレベルが低いですね。:)
0608デフォルトの名無しさん
NGNGそもそもそれらを比較しようとした奴がアフォなんだと思う。
0609デフォルトの名無しさん
NGNGじゃあ>>575の転載元書いたヤツはアフォということでファイナルアンサー?
0610デフォルトの名無しさん
NGNG>>1だろ。そもそも。
0611デフォルトの名無しさん
NGNG自分が好きなようにコード書いて比較したらいいじゃないか
C#で再帰が遅いのは仕方ない。
既にJITコンパイル済みかどうかチェックする為に間接コールになるからね。
それでも、2倍前後に収まってるのは頑張ってると俺は思うよ
それに、次のバージョンくらいで再帰対策用の仕様拡張くらいするんじゃないの?
0612デフォルトの名無しさん
NGNGC# : 8,192バイト
Del : 397,312バイト
驚くべきことに、C#の方が50倍近い差をつけて勝っています。
0613デフォルトの名無しさん
NGNG>再帰対策用の仕様拡張
コードレベルにまで及ばなければうれしいけどね。
0614デフォルトの名無しさん
NGNGFramework込みで計算するのが筋じゃないか?
後、ちょっと上のレス読めばわかるが君、馬鹿にされてるよ。
0615デフォルトの名無しさん
NGNGやだねー、洒落の分からない奴は。(嘲笑激藁
0616デフォルトの名無しさん
NGNG「嘲笑激藁」厨は(・∀・)カエレ!
0617デフォルトの名無しさん
NGNG0618デフォルトの名無しさん
NGNG1年持ったらいい方だろう。ソフトなんて。
0619デフォルトの名無しさん
NGNGあれ?VBの時は散々けなしてたくせに。(w
0620デフォルトの名無しさん
NGNG言われてみれば。。。炒ってきます。
0621デフォルトの名無しさん
NGNGやぱーり同じ穴のムジナだNE!ヽ(´∇`)ノ
0622デフォルトの名無しさん
NGNGVB:言語仕様が変わって従来ユーザーが付いて行けなくなった。
Dl:クラスライブラリのしがらみで完全に.NETに追従できなかった。
問題点は違うけどね。
0623デフォルトの名無しさん
NGNG0624デフォルトの名無しさん
NGNG・・・・とレスしてやる俺は親切な人か?
0625デフォルトの名無しさん
NGNG目頭が熱くなった。
0626デフォルトの名無しさん
NGNG駄目じゃん(藁
0627デフォルトの名無しさん
NGNG0628デフォルトの名無しさん
NGNGなぜか誰も修正しない。
晒しageの一種か?
0629デフォルトの名無しさん
NGNG従来のDelのソースから.NETへ落とせるのなら
存在価値が無いわけでもないってところでは
0630デフォルトの名無しさん
NGNGあ、そうか・・・荒らしレス(626のこと)なんざまともに読まないからね
0631デフォルトの名無しさん
NGNGhttp://pc.2ch.net/test/read.cgi/tech/1021038130/160
0632デフォルトの名無しさん
NGNGどうしてこんな独自仕様言語に肩入れするのがいるの?
VBの方がよっぽどマシだよ。仲間も多いし。
0633デフォルトの名無しさん
NGNG文法拡張しても、今迄ズッとしっかりした下位互換を見せてくれてたよ
さすがに今回は Object型は捨てられると思うけど、それはしょうがない
5年以上前から Object型は止めるってアナウンスしてたんだから
まあ仲間が多いのも良し悪し、
廃れ始めると人数余って悲しい事にならないとも限らないさ
それと
VB質問スレと Delphi質問スレみても VBの方に放置が多いぞ
もっとガンバレ
0634デフォルトの名無しさん
NGNGんなこたない。C#にもスタックに割り当てられるオブジェクトはある。
0635デフォルトの名無しさん
NGNG0636デフォルトの名無しさん
NGNG都合悪いときにアフォ?で済ませんな。
0637デフォルトの名無しさん
NGNG>Objectなのか誰か説明してくれよ。
オブジェクト=OOPとか思ってる人にはダメです。
0638デフォルトの名無しさん
NGNG本当だね。636は分かってなさすぎ。
0639デフォルトの名無しさん
NGNGすまんかった。てっきりそうなのかと。
で、Objectって何を指してるんだい?
0640デフォルトの名無しさん
NGNGC#って本当にオブジェクト指向なのか?
0641デフォルトの名無しさん
NGNGObject Pascal はオブジェクト指向Pascalの意味。
でどうして君は、関数内関数はオブジェクト指向を無視した構造だと
考える訳?
0642デフォルトの名無しさん
NGNG0643デフォルトの名無しさん
NGNG0644デフォルトの名無しさん
NGNGプッ 答エラレナインダネ
0645デフォルトの名無しさん
NGNG0646デフォルトの名無しさん
NGNG0647デフォルトの名無しさん
NGNG揶揄だとわからん君の方がイタい
0648デフォルトの名無しさん
NGNG0649デフォルトの名無しさん
NGNG0650デフォルトの名無しさん
NGNG↑>>648
0651デフォルトの名無しさん
NGNG0652デフォルトの名無しさん
NGNG/∵∴∵∴\
/∵∴∵∴∵∴\
/∵∴∴,(・)(・)∴|
|∵∵/ ○ \|
|∵ / 三 | 三 | / ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
|∵ | __|__ | < >>649 BCB++って何
\| \_/ / \_________________
\____/
______.ノ (⌒)
//::::::::|-、 ,-/::::::ノ ~.レ-r┐
/ /:::::::::::| /:::::ノ__ | .| ト、
| /:::::::::::::::| 〈 ̄ `-Lλ_レ′
レ::::::::::::::::::|/::: ̄`ー‐---‐′
0653デフォルトの名無しさん
NGNG0654デフォルトの名無しさん
NGNGDel厨って卑怯だね。(嘲笑激藁
0655デフォルトの名無しさん
NGNGオブジェクト指向と構造化は相反するものではありませんが?
0656デフォルトの名無しさん
NGNG関数内関数って局所化ができてない証拠でしょ?その内部関数はどうして
再利用できない場所に埋め込むの?再利用しないならどうして関数化するの?
0657デフォルトの名無しさん
NGNG相反するなんてどこにも書いてませんが?
0658デフォルトの名無しさん
NGNGC++のclass, structはデフォルトで
思いっきりスタックに割り当てられてるような・・・
0659デフォルトの名無しさん
NGNG俺はテクニック知ってるんだぞー、って。(嘲笑藁
0660デフォルトの名無しさん
NGNGインライン関数的な発想でしょ。
0661デフォルトの名無しさん
NGNG0662デフォルトの名無しさん
NGNG0663デフォルトの名無しさん
NGNG0664デフォルトの名無しさん
NGNG0665デフォルトの名無しさん
NGNGそれでは private な関数はどうして privateにするのですか?
片方はブロックを作ればいつでも変数を宣言出来たり、ブロックを
作らなくてもどこでも変数を宣言出来ます。
逆にpascalは関数の内部でも関数が作れます。
それはそれぞれのスタイルであり、OOとは関係ありません
0666デフォルトの名無しさん
NGNG0667デフォルトの名無しさん
NGNG0668デフォルトの名無しさん
NGNG0669デフォルトの名無しさん
NGNG0670デフォルトの名無しさん
NGNG建前
>>669
本音
0671デフォルトの名無しさん
NGNG相手が相手だから議論しても得るものないぞー
0672デフォルトの名無しさん
NGNGすまん、Object Pascalはまったくわからないんだが、Object Pascalには
public関数(メソッド?)とprivate関数という区別はないんだね?しかも、
関数内関数は定義している関数とは別の関数からでも呼び出せるんだね?
うっそー、ちがうっしょ。privateメソッドと関数内関数はまったく
ちがうじゃん。クラス内で再利用できるからprivateめそっどにするんだぜ。
その関数でしか使わないんじゃあprivateメソッドとは並べらんないよ。
0673デフォルトの名無しさん
NGNG0674デフォルトの名無しさん
NGNG>すまん、Object Pascalはまったくわからないんだが
出てこないように。相手のこと知らないのに相手のこととやかく言うのって失礼だと思うが。
0675デフォルトの名無しさん
NGNG関数内で再利用できるから、関数内関数にするんだぜ?
関数内で再利用、クラス内で再利用、ユニット内で再利用、
アプリケーション内で再利用。どれも再利用という観点から見れば
同じ。
0676デフォルトの名無しさん
NGNG関数内関数は
C++でいえば、関数でクラス定義をしたメソッドのようなものです
上手に使う人もいますし、逆に使わない人も居ます。それだけでしょう
0677デフォルトの名無しさん
NGNG初心者にきちんと説明できない人が上級者気取りですか?(嘲笑激藁
0678デフォルトの名無しさん
NGNGだから >>595は 再帰処理を書く時のクセでそう書いたのでしょう
0679デフォルトの名無しさん
NGNGローカル変数も関数内で再利用できるNE!
0680デフォルトの名無しさん
NGNGクラスのprivateすら汚さないようにできることだな。
Cの
{
...
{
int i;
}
}
みたいなもんだ。
0681デフォルトの名無しさん
NGNGそれは再利用とは言わん。ただのズボラだーよ
0682デフォルトの名無しさん
NGNG長い関数を細かく分けるときにスコープを広げずに分けられるから便利なんだよなぁ。
俺pascalやってないけど関数内関数は他の言語でもほしい。
0683デフォルトの名無しさん
NGNG0684デフォルトの名無しさん
NGNGやっぱどうでもいいや。じゃましたね。
0685デフォルトの名無しさん
NGNGint func(void){
int a=0;
void privateFunc(int n){ a+=n;};
・・・
}
みたいな感じで書ければ便利とは思うけどねブロックに名前が付けられのもあるんだから
ついでに呼び出し出来るようにしても良いように思うけど
0686デフォルトの名無しさん
NGNG0687デフォルトの名無しさん
NGNGでは家元は帰るぞ。
0688デフォルトの名無しさん
NGNG長い関数を分けるという考え方はOOP的じゃないけどな。
0689デフォルトの名無しさん
NGNG0690デフォルトの名無しさん
NGNGOOPだったら長い関数はどうするんだ?
0691デフォルトの名無しさん
NGNG0692デフォルトの名無しさん
NGNG分割統治はOOに限らず普遍的な考え方だね。
0693関数内関数の例
NGNGvar num:double;
var sym:char;
procedure addsub;forward;
procedure next;
var i,j:integer;
const sep='^+-/*()<>';
begin
if s='' then begin sym:=#0;exit;end;
for j:=1 to length(sep) do
if s[1]=sep[j] then begin sym:=s[1]; delete(s,1,1);s:=trim(s); exit;end ;
sym:=#1;
for i:=2 to length(s) do
for j:=1 to length(sep) do
if s[i]=sep[j] then begin
num:=StrToFloat(copy(s,1,i-1)); delete(s,1,i-1); exit;end;
num:=StrToFloat(s);s:='';
end;
procedure factor;
begin
if(sym = #1) then next
else if(sym = '(') then
begin next; addsub;
if(sym <> ')') then raise Exception.Create(' )がない');
next;
end
else raise Exception.Create('数があるべき');
end;
procedure muldiv;
var savenum:double; var oldsym:char;
begin
factor;
while (sym in ['*','/','^'] ) do begin
savenum:=num;oldsym:=sym; next;
factor;
case oldsym of
'*': num:=savenum*num;
'/': num:=savenum/num;
'^': num:=power(savenum,num);
end;
end;
end;
procedure addsub;
var savenum:double; var oldsym:char;
begin
case sym of
'+': begin next; muldiv; end;
'-': begin next; muldiv; num:=-num; end;
else muldiv;
end;
while (sym in [ '+','-'] ) do
begin savenum:=num;oldsym:=sym; next; muldiv;
case oldsym of
'+': num:=savenum+num;
'-': num:=savenum-num;
end;
end;
end;
begin next; addsub; Result:=num;
end;
0694デフォルトの名無しさん
NGNG0695デフォルトの名無しさん
NGNG俺ならクラス&メソッドに分割して
必要なら関数でラップするよ。
0696デフォルトの名無しさん
NGNGわざと悪例を出したの?
0697デフォルトの名無しさん
NGNG0698デフォルトの名無しさん
NGNG0699693
NGNGただ、ちょっとした文字列処理を手軽に書くにはこれは結構便利だという例ね
素早く、そして短く書ける。
そして大事な事は、このコードはクラスに変更するのも簡単だという事
0700693
NGNG確かに、関数内関数を使うと、
再帰的な処理を、何も考えずに、素直に書く事が出来る。
これはやっつけ仕事の典型かもしれないけど、コードを見てくれれば判ると思うけど、
たとえ何も考えずに素直に書いても、後でクラス化するのが、逆に簡単になってるでしょ?
0701デフォルトの名無しさん
NGNG0702デフォルトの名無しさん
NGNG0703デフォルトの名無しさん
NGNG努力は認める。でも、今は出てくるな。
0704松原潤
NGNG0705デフォルトの名無しさん
NGNGマ板でも嘘書いてたので、よろしく。
0706デフォルトの名無しさん
NGNGこれじゃあVB.NET使いの方がはるかにレベルが高いよ。
0707デフォルトの名無しさん
NGNG0709デフォルトの名無しさん
NGNGこの板の中では聞いたこと無い。
0710デフォルトの名無しさん
NGNG0711デフォルトの名無しさん
NGNGDel厨って構造化プログラミングしかできないのか。
これじゃあVB.NET使い(俺)の方がはるかにレベルが高いよ。
0712デフォルトの名無しさん
NGNGWindowsと同等にWinCE上でも動くとか
XBOX上と共用のエロゲが作れるとか、
0713デフォルトの名無しさん
NGNG既に割り切った。
Windows64(w)で再コンパイルなしで動けばいいや。
0714デフォルトの名無しさん
NGNG0715デフォルトの名無しさん
NGNGコンソールはともかく16bitのDOSはどうよ?
0716デフォルトの名無しさん
NGNG俺、Delphi1で16bitアプリ作る事あるよ それをW2000で走らせたって快適に動くし
0717デフォルトの名無しさん
NGNGIntelって64ビットで現在のx86捨てるんじゃなかったっけ?
だとしたらエミュレーション以外では動かない。
じゃあ、過去のしがらみでウニウニしない.NETアプリの方が良いかと。
0718デフォルトの名無しさん
NGNG0719デフォルトの名無しさん
NGNG0720デフォルトの名無しさん
NGNGそして Win32アプリを動かすなら ついでにWin16/DOSアプリを動かすのも大した手間ではないだろし
0721デフォルトの名無しさん
NGNG0722デフォルトの名無しさん
NGNGそれはハードの問題でIA64は286以前とは互換性ないとか
そういうハナシだったはず。
余計なトランジスタ使うと性能上がらないと思われ。
0723デフォルトの名無しさん
NGNG0724デフォルトの名無しさん
NGNGDelphi.NETがVB.NETにも及ばない中途半端なものだと分かったからって
そうカリカリするなよ。
0725デフォルトの名無しさん
NGNG負け犬の典型だな。(プッ
0726デフォルトの名無しさん
NGNG86命令のエミュレートが増えたくらいで死ぬほど遅くはならないでしょう
0727デフォルトの名無しさん
NGNGVB.NETのすごさが知りたい。
サンプルを交えてVB.NETのすごさについて教えてくれ。
0728デフォルトの名無しさん
NGNGだからさ、そうやって「一部動かないプログラムがあります」とするより
今の内に.NETと言うプログラミングスタイルと完全マルチWindowsバイナリを浸透させたいと。
0729デフォルトの名無しさん
NGNG新バージョンがでたら、旧バージョンを大幅に安くするとか。
0730デフォルトの名無しさん
NGNG駄目じゃん(藁
0731デフォルトの名無しさん
NGNG0732デフォルトの名無しさん
NGNG世の中には無料にしても全然普及しないものもあるんだよ。(嘲笑激藁
0733デフォルトの名無しさん
NGNGよろしくお願いします。
0734デフォルトの名無しさん
NGNG逆に、M$には .NET だけしか移行出来ませんみたいなWin64出して欲しいな
それなら、Linux64 で Win32エミュレートすれば勝てそう
0735デフォルトの名無しさん
NGNGVisualC#でネイティブコンパイルできたら、
俺もDelphiに未練を感じたりしないんだがな。残念。
ていうか、どうしよう。
0736デフォルトの名無しさん
NGNGいっそIntelに.NETコンピュータを。
0737デフォルトの名無しさん
NGNGVB.NETにも勝てないことを認めたからDelphi.NETを出すんでしょ?
で、過去のDelphiとの互換性は一切捨てると。
0738デフォルトの名無しさん
NGNG取りあえず敵を攻撃するなら敵を知ってからにしてくれ。
ちゃんちゃらおかしい。
0739デフォルトの名無しさん
NGNG0740デフォルトの名無しさん
NGNG0741デフォルトの名無しさん
NGNG駄目じゃん(藁
0742デフォルトの名無しさん
NGNG.NETが普及すればC#が普及する。
.NETが普及しなければDelphi.NETは無駄になる。
0743デフォルトの名無しさん
NGNG取りあえず今のところVCL->.NETコンバータ以上の使い方は見えない。
まぁ、VB.NETもコンバータだが。
0744デフォルトの名無しさん
NGNG0745デフォルトの名無しさん
NGNGVB.NETはコンバータじゃないよ。
0746デフォルトの名無しさん
NGNGVBにはマクロ言語としての使い道「も」ある。
Delphiには何の使い道もない。
0747デフォルトの名無しさん
NGNG> VBにはマクロ言語としての使い道「も」ある。
必要性は疑問視されているが。
0748デフォルトの名無しさん
NGNG0749デフォルトの名無しさん
NGNGVS.NETのオートメーション。
将来のOfficeもVB.NETベースになる。
0750デフォルトの名無しさん
NGNGハッタリ発表には笑ったよ。これが倒産前の会社の断末魔の叫びかって。
0751デフォルトの名無しさん
NGNG純粋に疑問。
C#でダメな理由とかあったの?
コンパイルすればどれだって・・・。
0752デフォルトの名無しさん
NGNG0753デフォルトの名無しさん
NGNG0754デフォルトの名無しさん
NGNGzは 1,2,4,8,16,...2^64迄の65個しかない
x+y=2^64/z だからこれは沢山あるね
0755デフォルトの名無しさん
NGNGC#だとレイトバインドがめどいから。
0756デフォルトの名無しさん
NGNGめんどいの間違い
0757デフォルトの名無しさん
NGNGそんな間違いどうでも良いからレイトバインドについて少し書いて欲しかった。
0758デフォルトの名無しさん
NGNG実行時にリフレクション経由で実行すること。
コンパイル時に型の情報がいらない。
0759デフォルトの名無しさん
NGNG>コンパイル時に型の情報がいらない。
C言語の時みたく渡す引数の型渡すとアボーンとか?
0760デフォルトの名無しさん
NGNGそりはparamsのことを言ってない?
0761デフォルトの名無しさん
NGNGすべて逆。
0762デフォルトの名無しさん
NGNG2.8 リフレクション (Reflection) とは ?
.NET のコンパイラはすべて、作成したモジュールの中に定義される
タイプに関するメタデータを作成します。このメタデータは、モジュールの
中に同梱されます。また、モジュールはさらに、アセンブリにまとめられます。
メタデータは、リフレクション(Reflection) という方法でアクセスされます。
System.Reflection ネームスペースの中には、モジュールやアセンブリに
入っているタイプにアクセスするためのクラスがあります。
Reflection をつかって、.NET のメタベースにアクセスするのは、
ITypeLib/ITypeInfo をつかって、COM のタイプライブラリのデータにアクセス
するのと同じです。目的もよく似ています。
たとえば、コンテキスト、プロセス、マシン間でマーシャリングするデータの
サイズを決定する場合に利用されます。
普通のアプリケーションの開発者が、Reflection を直接利用することは
あまりありません。
*/
[dotNET:00054] .NET FAQ : 2. 基本技術 より
これってそのモジュールで使われている型のデータをクラスとして持っていて、
アクセスすることが出来るってこと??
まだまだ理解が甘いですな。俺。
0763デフォルトの名無しさん
NGNG具体的に
0764デフォルトの名無しさん
NGNGuses Windows, SysUtils, Graphics,forms;
var x,y,xs,ys,c,i:Integer;
begin
with TCanvas.Create do try
Handle:=GetDC(0);
xs:=(GetSystemMetrics(0));
ys:=(GetSystemMetrics(1));
while GetKeyState(1)>= 0 do
for i:=0 to 10000 do begin
x:=random(xs);
y:=random(ys);
Pixels[x,y]:= Pixels[x+1,y+1];
end;
finally free;InvalidateRect(0,nil,True); end;
end.
0765デフォルトの名無しさん
NGNGGDIなんて原始的なもの使わないよ。
0766デフォルトの名無しさん
NGNG0767デフォルトの名無しさん
NGNGで、君は何厨だ?
Delphi厨でないことは確かだが。
0768デフォルトの名無しさん
NGNG単に何をやっているのか理解できないだけでしょ(藁
0769デフォルトの名無しさん
NGNGSystem.Drawing
0770デフォルトの名無しさん
NGNG何のクラスかも書いてないし。
0771デフォルトの名無しさん
NGNG?
0772デフォルトの名無しさん
NGNG0773デフォルトの名無しさん
NGNGコンパイルは コンソールから dcc32 temp.pas とかして 出来た temp.exeを実行
0774デフォルトの名無しさん
NGNGいや、だからお前は何がしたいわけ?
って言うかコンパイルできるPascalソースとしては不完全だろう、それ。
0775デフォルトの名無しさん
NGNGそのままでコンパイルは出来るけど、標準パスカル互換にしたいなら
program 保存した時のソース名(input, output);
を1行目に追加してくれ
0776デフォルトの名無しさん
NGNG一行目に答えてくれ。
0777デフォルトの名無しさん
NGNG0778デフォルトの名無しさん
NGNGこれがObject Pascalのソースか。(@_@)
(´-`).。oO(どこがオブジェクト指向なんだろ?)
0779デフォルトの名無しさん
NGNG動作が判らなかったら実行してみればいい
0780デフォルトの名無しさん
NGNG#include <stdio>
namespase std;
int main()
{
printf("%d",5);
return 1;
}
0781デフォルトの名無しさん
NGNG話をすり替えるなよ。
0782デフォルトの名無しさん
NGNG俺もDel厨だけどさ、わざわざGDIで勝負挑んでいるのは痛い。
.NETで面倒なところを突かないと勝てないのかと思われる。
別にクイックソートとかでも言い訳だし。
0783デフォルトの名無しさん
NGNG0784デフォルトの名無しさん
NGNGごみん、ソース読んでなかった。
あれみてGDIって叫んだ奴も相当だな・・・。
0785デフォルトの名無しさん
NGNG0786デフォルトの名無しさん
NGNGいや、お前もソース読もう。
0787デフォルトの名無しさん
NGNG0788デフォルトの名無しさん
NGNG0789デフォルトの名無しさん
NGNG悪いが同意。
0790デフォルトの名無しさん
NGNG0791デフォルトの名無しさん
NGNG0792デフォルトの名無しさん
NGNG0793デフォルトの名無しさん
NGNG0794デフォルトの名無しさん
NGNG0795デフォルトの名無しさん
NGNGブロックを囲むのにbegin〜endなんて使わない。
0796デフォルトの名無しさん
NGNG0797デフォルトの名無しさん
NGNGあれって、.NET Framework入れれば、VS.NETいれてない他のパソコンでも見られる?
ネットワーク上の他のパソコンから見たいんだけど、コンポーネントがないとか言われて
見られなかったよ。
0798デフォルトの名無しさん
NGNGVS.NET入れてないマシンでも最新のMSDN入れるとあれだから。
0799デフォルトの名無しさん
NGNGhttp://pc.2ch.net/test/read.cgi/prog/1022150734/19-27
↑ここでも同じ話が・・・
0800デフォルトの名無しさん
NGNG由緒正しいAlgol直系の言語だから。
0801デフォルトの名無しさん
NGNG元々、Cの方が異端という感じだからね
「正当な言語」なんて言われるとくすぐったいんじゃないかな
0802デフォルトの名無しさん
NGNGMSX-Cのせい?
0803デフォルトの名無しさん
NGNGとにかくUNIXの影響が大きいし(CはUNIXのために作られた言語)
M$がWindowsに採用したことも大きかった
実はM$もPASCALを出してたんだけど
某のTurbo Pascalにこてんぱんにやられて姿を消した
0804デフォルトの名無しさん
NGNGって宣伝されていたら歴史は違ったものになっていたでしょう。
0805デフォルトの名無しさん
NGNG逆でしょ。十分普及してたから採用した。
0806デフォルトの名無しさん
NGNG他の選択肢も有り得た
例えばMacはPascalの世界だった
0807デフォルトの名無しさん
NGNG0808デフォルトの名無しさん
NGNGどのみちPascalのスタックフレームにはならないよ。
あのブロックスコープを実現する構造は
API呼び出しに持って来れないから、Pascal側でも
規約が必要。
0809デフォルトの名無しさん
NGNG保守もバージョンアップもする技術がなくて、おまけに
Turbo Pascal の安さにもかなわなくて、静かに去った。
0810デフォルトの名無しさん
NGNG0811デフォルトの名無しさん
NGNG0812デフォルトの名無しさん
NGNGDelphi7はそれだけ中途半端ということなのかな。
0813デフォルトの名無しさん
NGNG知ってて当然の言語だったんだけどな。
0814デフォルトの名無しさん
NGNGむしろC#のRADをスクラッチで開発して欲しかった。
JBuilderのC#版みたいな感じでね。
それで非MS環境(ApacheとかCORBAとか)でも開発できるようにすれば
間違いなくキラーアプリになったはず。
0815デフォルトの名無しさん
NGNG分化だけは勘弁して欲しい。
0816デフォルトの名無しさん
NGNG良い事言うね。Delphiにこだわり過ぎてるのが敗因だと俺も思う。
0817デフォルトの名無しさん
NGNG0818デフォルトの名無しさん
NGNGこの画面見てて思ったんだけど、T〜クラスって.NETのクラスをラッピングしてるだけっぽいよね。
なんでこんな中途半端なことするんだろ。J#の二の舞だよ。
0819デフォルトの名無しさん
NGNG0820デフォルトの名無しさん
NGNG0821デフォルトの名無しさん
NGNGますます分からん。
Delphi7(Aurora)≠Delphi for .NET (ただしPreview版を同梱)
Delphi for .NET(Galileo)≠Delphi8
0822デフォルトの名無しさん
NGNG(J++のソースも変更なしでほとんどコンパイルが通ってしまう。)
ただ、JDKやWFCのクラスを無理やりラップしまくってるのでまともなパフォーマンスが出ない。
(はっきり言ってJScript.NETより遅いこともある。)
VCL for .NETが互換性確保のためにこうならないことを祈る。
0823デフォルトの名無しさん
NGNG0824デフォルトの名無しさん
NGNG0825デフォルトの名無しさん
NGNG言語ってほどのものじゃないでしょ。
ソースを見ればどういうILを出しそうか容易に想像がつく。
0826デフォルトの名無しさん
NGNGこういうのって初めてじゃないのかな?
0827デフォルトの名無しさん
NGNGそりゃあ、どっちかについてしまったら商品が成り立たなくなる。(w
0828デフォルトの名無しさん
NGNGいや、煽るだけ煽って結論は一切出さずってのがよくあるでしょ。
0829デフォルトの名無しさん
NGNGむかつく!
0830デフォルトの名無しさん
NGNGこのスレとかね
0831デフォルトの名無しさん
NGNG勝負はついてるでしょ。
0832デフォルトの名無しさん
NGNGでも、しょうもない事いうより、どんどんコード出して挑戦するのが勝利の近道
0833デフォルトの名無しさん
NGNG0834デフォルトの名無しさん
NGNG0835デフォルトの名無しさん
NGNG日経ソフトウェアなんかはWindowsプログラミング = .NETと言わんばかりだ。
Win2000 WorldのCD-ROMにも.NETがついてるし、来月号のCマガでもついてくる。
もはや非.NETの開発環境なんて見向きもされないね。
Delphiの連載記事もますます立場がなくなるんじゃないの?
0836デフォルトの名無しさん
NGNG「Windows上では」の話ね。一応。
0837デフォルトの名無しさん
NGNG正直、これからプログラミングを始める人は.NETに対応してないwin開発環境は選ばないと思う。
DirectXや画像処理の本までVB.NETベースで出てるのには驚いた。
0838デフォルトの名無しさん
NGNG日経SW は MS よりなんですぅ・・・
営業が MS 製品関連記事なら売れると思ってる。
後、編集に知識がない。VB房ばっか。
Cマガ は 某国 よりなんですぅ・・・
営業も編集もコアなオタクが揃ってる。
0839デフォルトの名無しさん
NGNG0840デフォルトの名無しさん
NGNGそういやこの2冊は「VB.NETでも十分。C#に移行する必要なし。」という
共通した結論だったな。
0841デフォルトの名無しさん
NGNGあれじゃただのDGNだ。
0842デフォルトの名無しさん
NGNG0843デフォルトの名無しさん
NGNG0844デフォルトの名無しさん
NGNG雑誌の広告が?、それとも某駅の看板かな?
あ、Del厨が2chのあちこちに蔓延るってことか・・・鬱だ死のう
0845デフォルトの名無しさん
NGNGめでたし、めでたし。
0846デフォルトの名無しさん
NGNG0847デフォルトの名無しさん
NGNG0848デフォルトの名無しさん
NGNG引き抜かれたとかそういうことじゃなくて某がダメダメだっただけじゃん。(w
0849デフォルトの名無しさん
NGNG実務的にはGCのある言語を入門用とするのは危険な気がする。
0850デフォルトの名無しさん
NGNG0851デフォルトの名無しさん
NGNGじゃあJavaもC#もVB.NETもDelphi.NETも駄目じゃん
0852デフォルトの名無しさん
NGNGアセンブラ->C/C++をやってから、GC言語に移行するべし。
0853デフォルトの名無しさん
NGNGそうだと思う。
C#書いててこのオブジェクトたちは無事に解放されるのだろうかと不安になった。
0854デフォルトの名無しさん
NGNG0855デフォルトの名無しさん
NGNGうん、使い捨てるのに何の躊躇もない。w
0856デフォルトの名無しさん
NGNGVBのまま留まってしまったか・・・
0857デフォルトの名無しさん
NGNGどこ?
0858正直な感想
NGNGDelphi,VC++歴7年目のユーザです。
8:2で Delphi を使ってきたアマチュアです。
ネイティブコンパイラでのアプリ作成用の環境として
VC++ より Delphi を勧める理由をたくさん挙げることが
できます。.NETが出て、その上の C# と比較すべきなのは
現行の Delphi ではなく、まだ発売されていない Delphi for
.NET のほうでしょう。.NET frameworks の上のプログラミング
言語は、それが提供するクラスオブジェクトをラッピングした
ライブラリを持つことにより、ライブラリの差はあまりなくな
るでしょう。その意味では、開発環境としての性能には
どれを選んでも大差なくなるでしょう。では、C# と Delphi.NET
ではどうでしょうか?
明らかに半年以上遅れて発売されたものより、OSをつくった
メーカがほぼその環境にネイティブであるべき C# が優勢である
ことは確実です。Pascal はふるい言語なので、これまでいろ
いろな事情を引きずってきています。言語としても、たぶん、
C# の方が後発である分だけ有利です。わたしは、現行の Delphi
の熱心な支持者であることは間違いありませんが、Delphi.NET が
出たとしても、C# より優先してそちらを使う、ということは考え
られません。
現行の Delphi ユーザのみなさんのお考えを伺いたいと思います。
やはり Object Pascal がいいですか? わたしは大好きですが。
0859デフォルトの名無しさん
NGNG過去ログ読んでね。
0860デフォルトの名無しさん
NGNG自己満足の美しいプログラム・・・Delphi.NET
とりあえずお仕事で使うよな→自習中・・・C#.NET
VS6出荷終了?、しかたないな→VB.NET
0863デフォルトの名無しさん
NGNGJavaScriptも一応OOPLだからHSPの時点でレベルダウンしてるな。
0864デフォルトの名無しさん
NGNGDelphiユーザは.NETではC#という人が多いと思われます(漏れも〜)
Delphi.NETにはコンバータとしてのみ期待します
0865デフォルトの名無しさん
NGNG俺もそう思たヨ。
0867デフォルトの名無しさん
NGNG全面的に同意。
0869858
NGNG回答ありがとう
「仕事」についてはアマには分かりませんが、VB.NET ですか。
.NET 上での仕事も VB が多いんですかねぇ。過去の資産ですか。
VB.NET についてはよく知りませんが、旧VB とは別物なのでしょ
うね。
みなさん、ありがとうございました。
C# に行きます!
0870デフォルトの名無しさん
NGNGおいでませ♪
0872858
NGNGはい、>>860 で、そのことを承知していました。
アマにはプロの「仕事」についての厳しさみたいなものが
分かりませんので、869 みたいに書いたんです。
「ひとつ選べ」というのは、もしわたしに勧めるとしたら
という意味でした。860 の内容から、VB.NET を勧めたい
わけではないことは分かっていました。
ありがとうございました。
0873858
NGNG諸般の事情から1ヶ月後くらいになりますが、よろしく。
でも、ネイティブコンパイラとしての Delphi は使い続ける
つもりです。まぁ、もうバージョンアップはしませんが。
0874デフォルトの名無しさん
NGNG0875デフォルトの名無しさん
NGNGマジですか?
0876デフォルトの名無しさん
NGNG0877デフォルトの名無しさん
NGNGD7はネイティブ(.NETじゃない)
その次が.NETらしいが、ネイティブと分化するのかどうかまで知らない
0878デフォルトの名無しさん
NGNGCLXを強化していくのかな。
0879デフォルトの名無しさん
NGNG858 はしないという意味だろ
0880デフォルトの名無しさん
NGNGあちこちでDelphi.NETが叩かれまくってているが、
.NET Frameworkを使うとDelphiって簡単に移植できそうに思うやついないか?
0881デフォルトの名無しさん
NGNG小さな企業じゃ、まだまだWin95 RAM32M HD740Mなんてマシンも現役だ。
10年リースが切れる迄は捨てる訳にはゆかない。
この不況だから、金使うなら従業員の雇用守る方に使わなけりゃね
ただ、業者は3年先の為に準備は必要だろう。
VB6で業務アプリやってた所はこの3年の間が準備期間だ
Delphi.NETが VCLで素直に書いてそのまま動くなら、この3年の間に
VB->Delphi->Delphi.NETなんて流れもあるかもしれないね。
0882デフォルトの名無しさん
NGNGでなければ ネイテブアプリを書けるC#を用意すべきだったと思う
0883デフォルトの名無しさん
NGNG> VB->Delphi->Delphi.NETなんて流れ
あるわけねー。
0884デフォルトの名無しさん
NGNG0885デフォルトの名無しさん
NGNGVB使いの勉強はいつでもOJTなのに、VB.NET はまだ仕事に使えないとなると
Delphiに移動という事かな
0886デフォルトの名無しさん
NGNGだってVBってHSPと似たようなポジションでしょう。
.NETでやっと他言語に追いつけたかな?って感じ。
0887デフォルトの名無しさん
NGNG0888デフォルトの名無しさん
NGNGどういう意味?>似たようなポジション
#業務にHSP使うっていうのは聞いたことないが・・・導入事例キボンヌ(あったら面白いな)
0889デフォルトの名無しさん
NGNG.NETはVB.NETで一本でという人は多いと思うよ。
0890デフォルトの名無しさん
NGNG0891デフォルトの名無しさん
NGNG0892デフォルトの名無しさん
NGNGVSAに対応してるのは現時点ではVBのみ。
0893デフォルトの名無しさん
NGNG過去ログ読もうか。
0894デフォルトの名無しさん
NGNG同じ用途で同機能の言語2つ覚えても楽しくないし。
0895デフォルトの名無しさん
NGNGその楽しさを奪うのが.NETです。
0896デフォルトの名無しさん
NGNGそれは良く分かるね
でもマクロでVBを強要されるなら、尚更C#を使いたくなるけどね
0897デフォルトの名無しさん
NGNGVisual Studio for Applications deha
1 Visual Basic .NET
2 Script .NET
3 およびコンパイル済みのコードをコンパイルしないで実行できるスクリプト エンジン
の3つがサポートされているらしい
0898デフォルトの名無しさん
NGNG>3 およびコンパイル済みのコードをコンパイルしないで実行できるスクリプト エンジン
MSILインタプリタ?
0899Delフサギコ ◆zE1iiRdQ
NGNG/
| 既存のVB、VC++使いは
| 今までの蓄積したものがなくなってしまった,,,
| という感覚はあるんでしょうか?
| 特にMFC使いとかは…VC++.NETがあるからいいのかな?
\_ ____________
|/
∧,,∧
ミ,,゚Д゚ミy━~~
U ミ ヤスカッタので
〜ミ ミ VC#コウタ
U''U VSじゃないと
クラスが自分で作れないみたいだ…
なんでかしら。
0900デフォルトの名無しさん
NGNG(゚Д゚)ハァ?
SDKでもクラスライブラリは作れるだろうが。
0901@IT掲示板より
NGNG会社にEnterpriseがあるのなら、マニュアル等を見る事は出来るんですよね。
それなら、まだ良いですよ。
最近Personalを使う人が少し増えてる様ですが、ボーランドはドキュメントが弱いですから、かなり混乱してる人もいるみたいです。
私はPersonalはボーランド自身にとって良くないなという印象を持ってます。
最近ボーランドの製品高いですよね!
開発レベルと製造レベルを区別してないというか、あらゆる仕様を満たすツールとなると、定価36万のEnterpriseですからね!
それで、顧客の要望に応えるべくC++Builderも揃えるとなると、両方で72万です。
バージョンアップ料金も他のスイートに比較すると、無茶苦茶高いですから!
顧客にボーランドツールの良さを納得させるには、具体的に作って見せるのが一番良いんですが、それをボーランド自身が妨害しているという印象を私は持ちますね!
@ITの「Java Solution」でも、内容の割にJBuilderが高過ぎるという話が出てますよ。
その点、MSは全てのサーバー、それにあらゆる開発ツールが付いて来るMSDNユニバーサルでも、トータル実質で30万円弱あれば、購入できます。
これがあれば、あらゆる状況での開発が出来ますからね!
それに、サポート・サービスもセットで付いて来ます!
ボーランドは全くないですよ!
だから、Delphiの製品版を店頭で見ないのは、無理ないですよ。
今のEnterpriseがProfessional価格になれば、自然に売れて来ると思ってましたが、もう時期的に遅いですね!
一番大切なのは、クラスライブラリですから!
本当は、ボーランドは今までに自社のクラスライブラリである、VCL(CLX)を普及させておく必要があったのですが。
(だから、期待が持てるとすれば、Delphi.Netですね。ボーランドの対応を私は見たいと思います!)
だから、VisualStudio.NET 私は売れると思いますよ。
かなりの人がMSDNを買ってるんじゃないですか?
私は、そう感じます。
0902デフォルトの名無しさん
NGNGなくなってしまっていないので、当然そういう感覚はありません。
>>901
こいつはアフォです。相手にするのはやめましょう。ビツクリマーク使いすぎじゃボケェ
0903デフォルトの名無しさん
NGNGこの意見に限ってはアフォじゃないと思う。正論。
0904デフォルトの名無しさん
NGNGしかもそれで比較してるつもりの点だろ
0905デフォルトの名無しさん
NGNGそして、それは事実。
0906デフォルトの名無しさん
NGNGそうか、ついでに、
価格・機能・サービス・品質のどれをとっても日本人が劣っているとも指摘しといてくれ
0907Delフサギコ ◆zE1iiRdQ
NGNG0908デフォルトの名無しさん
NGNGそうだね。日本ではVB人口が少ないもんね。
0909デフォルトの名無しさん
NGNGその道具の値段が高い安いはないだろみたいな?
0910デフォルトの名無しさん
NGNG市場が冷静な評価を下してることに気付けよ。(ワラ
VS.NETの方がよく売れてるだろ?
0911デフォルトの名無しさん
NGNG0912デフォルトの名無しさん
NGNG無料のもの相手にどっちが売れてるかなんて争っても・・・
0913デフォルトの名無しさん
NGNGDelphiに金払ってるヤシはいないと?
0914デフォルトの名無しさん
NGNG見たこと無いな(w
0915デフォルトの名無しさん
NGNGプログラマ人口の正規の派遣業者が1割、残りも派遣出向や受託による下僕状態です
企業内プロも、設計とコーデングが分かれていると、どうしても人数の揃え易い
M$謹製ツールになってしまうでしょう
Delphiは、設計もコーデングも一人こなさなければならないようなワンマンアーミー的な
スタイルを取っているプロジェクトにしか受け入れられないでしょう。
0916デフォルトの名無しさん
NGNGつまり趣味プログラミングにのみ適してると(w
0917デフォルトの名無しさん
NGNG趣味というのがプログラミングの勉強の事なら、pascalだけでなくlispとcはやっておくべきでしょう
ひとりで設計製作するスタイルを取る企業内なら、Delphiは十分に戦えると言っています。
0918デフォルトの名無しさん
NGNG「物件を一人で受注から引渡し迄会社の代表として完了させる」とか言ってた
0919デフォルトの名無しさん
NGNGわるいのですか?
どぉりで。
0920デフォルトの名無しさん
NGNGVBは一人で開発しないと効率が悪い。
VC++はどれだけ充実したクラスライブラリを所持しているか次第。
0921デフォルトの名無しさん
NGNGどぅりで。が正解だろ。
0922デフォルトの名無しさん
NGNG0923デフォルトの名無しさん
NGNGせめて Delphi Professional 版には旧バージョンでもいいから
ついて欲しかった。
0924デフォルトの名無しさん
NGNGC#で Windows.pas や WinUser.h に相当するようなものってどこかで
手に入りますか?
パラメータを素直に渡してくれないので Win32 API 呼び出しの定義を
作るのは少し面倒ですね。これに一番時間を取られてしまう。
0925デフォルトの名無しさん
NGNG0926デフォルトの名無しさん
NGNG0927デフォルトの名無しさん
NGNGお兄さん悲しくなった。
0928924
NGNGどうかわからない機能があるので使いたいのです。
例えばクリップボードを監視して、テキストがコピーされたら
処理するような場合です。
C# のコードを書く時に使うユーティリティ類もできれば C# で作れば勉強
になるだろうと思って作り始めたのですが、今までは気にする必要が無かった
ところで詰まったりして意外とはかどりません。
アンマネージな機能が必要な場合はこれからも Delphi (または C++ )で
やった方がいいんでしょうか。
0929デフォルトの名無しさん
NGNG>例えばクリップボードを監視して、テキストがコピーされたら
>処理するような場合です。
名前忘れたけどあるよ。クリップボードクラス。
0930デフォルトの名無しさん
NGNG.NET Framework ⊇ WIN32API
なのかな?
0931デフォルトの名無しさん
NGNGむしろ上手にラップしてると見るべき
0932デフォルトの名無しさん
NGNGというか、VCLを使わないDelphiに、それほど魅力が無いのと同じじゃないのかい?
0933デフォルトの名無しさん
NGNG.NETでカバーしてない機能って例えばどんなの?
0934デフォルトの名無しさん
NGNGおいらもC移植して勉強中なんだけど、API使わずにってこんなにつらいと思わなかったよ
APIなしよりはVCLなしのほうがまだいけるような気がする
0935デフォルトの名無しさん
NGNGGUIアプリの開発なんてやらないよ。
0936名無しさん@Emacs
NGNGそういえばGetAsyncKeystateのなるようなものもないよね?
あったらおせーて
0937Delフサギコ ◆zE1iiRdQ
NGNG∧,,∧ クリップボード更新処理はDelphiなら
ミ,,゚Д゚彡 こんなんだけど...
ミつ[|lllll])
〜ミ ミ APIなしでVCLとかCLXだけで何でもできたら
U U. Delphi製アプリはほとんどが
Linuxでも動くけど実際は
そうは問屋が卸してくれないみたい。
type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
private
FClipNextHandle: HWND;
procedure WMDrawClipboard(var Msg: TWMDrawClipboard);
message WM_DRAWCLIPBOARD;
procedure WMChangeCBChain(var Msg: TWMChangeCBChain);
message WM_CHANGECBCHAIN;
public
end;
procedure TForm1.WMDrawClipboard(var Msg: TWMDrawClipboard);
begin
inherited;
ShowMessage('クリップボード更新');
if FClipNextHandle<>0 then
SendMessage(FClipNextHandle,WM_DRAWCLIPBOARD, 0, 0);
end;
procedure TForm1.WMChangeCBChain(var Msg: TWMChangeCBChain);
begin
if Msg.Remove = FClipNextHandle then
FClipNextHandle := Msg.Next;
if FClipNextHandle <> 0 then
SendMessage(FClipNextHandle, WM_CHANGECBCHAIN, Msg.Remove,Msg.Next);
end;
procedure TForm1.FormCreate(Sender: TObject);
procedure ClipboardSetHandle;
begin
FClipNextHandle := SetClipboardViewer(Form1.Handle);
if FClipNextHandle = 0 then
if GetLastError <> 0 then
ShowMessage('クリップボードフック失敗');
end;
begin
ClipboardSetHandle;
end;
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
ChangeClipboardChain(Handle, FClipNextHandle);
end;
0938Delフサギコ ◆zE1iiRdQ
NGNGSetClipboardViewer(Form1.Handle);
のAPIでFormのハンドルをクリップボードViewerに登録
WMDrawClipboardとWMChangeCBChainを
Formで受け取って
WMDrawClipboardでは
更新されたときの処理を記述するのと
次のクリップボードハンドル(FClipNextHandleで保持)
にメッセージ送る処理
WMChangeCBChainでは
クリップボードフックをはずした時の処理とかを
書いておく
って感じかしら。
C#でもAPI使うのも
メッセージ受け取りもかけるからできると思われ。
_____________
∧,,∧ /
ミ,,゚Д゚彡 < C#の練習がてらにどうでしょう。
U つ \
@ミ ミ  ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
∪''∪
これを、(GUIを隠すんじゃなくて)
GUI無しのExeで
やってくれって言われると、
Delphiではちょっと難しいかも。
0939Delフサギコ ◆zE1iiRdQ
NGNGミ,,゚Д゚彡
ミ つ旦)~~
〜と,,,~),,~)
C# 仲良し Delphi Round 2
http://pc.2ch.net/test/read.cgi/tech/1022662451/l50
戦わないようにスレ名を工夫しますた。
1000逝ったらDat落ちするのでご注意どぞ
0940デフォルトの名無しさん
NGNGC#でもAPI使わないとできないみたいだね。
http://www.atmarkit.co.jp/bbs/phpBB/viewtopic.php?topic=166&forum=7
0941デフォルトの名無しさん
NGNGhttp://do.sakura.ne.jp/~junkroom/cgi-bin/megabbs/readres.cgi?bo=lounge&vi=1021888173&res=7&fi=no
0942デフォルトの名無しさん
NGNG0943デフォルトの名無しさん
NGNG0944デフォルトの名無しさん
NGNG0945デフォルトの名無しさん
NGNG0946デフォルトの名無しさん
NGNG0947デフォルトの名無しさん
NGNG0948デフォルトの名無しさん
NGNG0949デフォルトの名無しさん
NGNG0950デフォルトの名無しさん
NGNG0951デフォルトの名無しさん
NGNG0952デフォルトの名無しさん
NGNG0953デフォルトの名無しさん
NGNG0954デフォルトの名無しさん
NGNG0955デフォルトの名無しさん
NGNG0956デフォルトの名無しさん
NGNG0957デフォルトの名無しさん
NGNG0958デフォルトの名無しさん
NGNG0959デフォルトの名無しさん
NGNG0960名無しさん
NGNGΛ_Λ | 君さぁ こんなスレッド立てるから |
( ´∀`)< 厨房って言われちゃうんだよ |
( ΛΛ つ >―――――――――――――――――――‐<
( ゚Д゚) < おまえのことを必要としてる奴なんて |
/つつ | いないんだからさっさと回線切って首吊れ |
\____________________/
(-_-) ハヤクシンデネ… (-_-) ハヤクシンデネ… (-_-) ハヤクシンデネ…
(∩∩) (∩∩) (∩∩)
(-_-) ハヤクシンデネ… (-_-) ハヤクシンデネ… (-_-) ハヤクシンデネ…
(∩∩) (∩∩) (∩∩)
(-_-) ハヤクシンデネ… (-_-) ハヤクシンデネ… (-_-) ハヤクシンデネ…
(∩∩) (∩∩) (∩∩)
0961デフォルトの名無しさん
NGNG0962デフォルトの名無しさん
NGNGそのキャップだけはいろんな意味で許せん。僕によこせ
0963デフォルトの名無しさん
NGNGタイプミス
スマソ
0964デフォルトの名無しさん
NGNG2ちゃんねるのお勧めな話題と
ネットでの面白い出来事を配送したいと思ってます。。。
===============================読者数: 138720人 発行日:2003/1/9
年末年始ボケがそろそろ収まり始めた今日このごろのひろゆきです。
そんなわけで、年末に予告したIP記録ですが実験を開始しています。
「2ちゃんねる20030107」
こんな感じで各掲示板の最下部に日付が入ってるんですが、
20030107以降になってるところはログ記録実験中ですー。
んじゃ!
────────────────────────Age2ch─
■この書き込みは、Age2chを使って配信されています。
────────────────────────────
Keep your thread alive !
http://pc3.2ch.net/test/read.cgi/software/1041952901/l50
────────────────────────────
0965デフォルトの名無しさん
NGNGIP表示せんと書けない掲示板なんていっぱいあるし
アクセス解析で取られまくりだし。むしろ今更何があかんの?て感じ
0966デフォルトの名無しさん
NGNG0967デフォルトの名無しさん
NGNG壊れたファイルは勘弁して下さい。
時期的な事もありますし。
只、今更 「最高の自分的に日程で」小説書きたいとか
もういいです。
電磁波盗聴対策するまでパソコン使用したくないし。
つか、貴方方の絡みで極右も絡んで偉い事になっているし。この板も今各国の機関ROMってるし。
「危機的な」私の私情の件をお願いします。シャレにならないです。(実際に)
・・ 本当は その後の執筆の為の「現段階での障害」(精神性が大事だし。環境も)である事の除去、や
「ファイルの復旧」が必要ですが。
結構繊細なんですよ
私は。
0968デフォルトの名無しさん
NGNGけんすうは公人だから歌広で童貞捨てたとか火星人だとかは名誉毀損にならないと思いますよ
0969デフォルトの名無しさん
NGNG0970デフォルトの名無しさん
NGNGひろゆきが楽観的な外ヅラしてるからってそのまま受け取る人はどかと思う。
0971デフォルトの名無しさん
NGNG内部告発はともかく。
0972デフォルトの名無しさん
NGNGその板の依頼厨の自業自得ってことで。
0973デフォルトの名無しさん
NGNGそうかな?大体2ch型の掲示板ってのはログ取ってないと思ったんだけど、、、
0974デフォルトの名無しさん
NGNGひろゆきは自宅に押しかけた暴走族に土下座した人だよ。
暴力団に脅されたら山奥に連れ出されるまでもなく玄関先で二つ返事で請け負うんじゃない?
権力には抵抗するけど、暴力には滅法弱い、それがわれらのひろゆき
0975デフォルトの名無しさん
NGNG0976デフォルトの名無しさん
NGNG2ちゃんねるのお勧めな話題と
ネットでの面白い出来事を配送したいと思ってます。。。
===============================読者数: 139038人 発行日:2003/1/10
なにやら、連日メルマガだしてるひろゆきです。
そんなわけで、ログ記録実験ですが、いちいちサーバ指定するのが面倒なので、
全部のサーバに入れてみました。
重くなって落ちたりしてもご愛嬌ってことで。。。
んじゃ!
────────────────────────Age2ch─
■この書き込みは、Age2chを使って配信されています。
────────────────────────────
Keep your thread alive !
http://pc3.2ch.net/test/read.cgi/software/1041952901/l50
────────────────────────────
0977デフォルトの名無しさん
NGNG, ― '
γ∞γ~ \
| / 从从) ) / ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
ヽ | | > < |〃 < うぐぐ、かあああああああ!!
`wハ~ Oノ) \_________________
/)) ー -- ー( \
/ /( )ヽ \
. ( ξ. ) ミ 彡 ( /ξ.. )
./ | |ヽ、______,/ | |
. | | | , .| .|
\| ̄ | ((゚)) /|. ̄ |
| |_)*(_/. | .| メチメチ
( ⌒) ‖ ( ⌒) メチ ブシャアアアアア
 ̄ ̄ ̄ ̄ ̄ ̄ 。゜J  ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
U。lU
。 │|。゜J_
l 。 │|。゜ ヽ
,川 。 ll。゜ l。ヽ
⊂_~ し、_ ゜ ー=ー_=ー,。゜ヽつ
0978デフォルトの名無しさん
NGNG0979デフォルトの名無しさん
NGNG0980デフォルトの名無しさん
NGNG0981デフォルトの名無しさん
NGNGhttp://live2.2ch.net/test/read.cgi/news/1042035002/
674 名前:ひろゆき ◆3SHRUNYAXA 投稿日:03/01/08 23:36 ID:1BXnvYvY
通報する人は、IPはあるので管理者に連絡してくれれば、
「捜査関係事項照会書で照会しますよー」って言ってたて伝えてくださいー。
902 名前:ひろゆき ◆3SHRUNYAXA 投稿日:03/01/08 23:41 ID:1BXnvYvY
>警視庁の情報提供っていうフォームで通報していいですか?
フォームでもよいかと。
通報者の電話番号とかもきちんとかいといたほうが
取り上げられる可能性高いです。
ホントは110のほうがいいんですが、、
0982デフォルトの名無しさん
NGNG0983デフォルトの名無しさん
NGNG知ってる人がいたら教えて下さい!!
0984デフォルトの名無しさん
NGNG0985デフォルトの名無しさん
NGNG0986デフォルトの名無しさん
NGNG0987デフォルトの名無しさん
NGNG0988デフォルトの名無しさん
NGNG全然安全じゃなくて、一番危険な立場だったという・・・お話だったとさ=完=
0989デフォルトの名無しさん
NGNG0990デフォルトの名無しさん
NGNG0991デフォルトの名無しさん
NGNGニュース速報板だからね。
0992デフォルトの名無しさん
NGNG削除依頼を内容証明以外の方法で行っても有効ですが、条理が根拠ではありません。
意思表示の一般原則であり自明のことです。
免責の対象にはならないから安心してください。
0993デフォルトの名無しさん
NGNGがんばってください
0994デフォルトの名無しさん
NGNG0995デフォルトの名無しさん
NGNG0996デフォルトの名無しさん
NGNG0997デフォルトの名無しさん
NGNG0998デフォルトの名無しさん
NGNG0999デフォルトの名無しさん
NGNG1000デフォルトの名無しさん
NGNG10011001
Over 1000Threadもう書けないので、新しいスレッドを立ててくださいです。。。
レス数が1000を超えています。これ以上書き込みはできません。