[Delphi:89122] 金太郎プロジェクト
中村 隆
金太郎プロジェクトのホームページを作成しました。
名前は金太郎飴をイメージして命名しました。ようするにアプリの作り方を
統一することで、仕事を融通しあうことが可能にならないか？
ということです。
ソースファイル自体を公開していますから、初心者のかたもきっと参考になると
思います。
・関数ルーチンは1996年から少しずつ拡張してきたもので、約１８０００行
あります。もっとも行数のわりに低機能かもしれません。
コンポーネントにすれば、もっとスマートになる部品もありますが、
コンパイルできる環境を作るまでに時間がかかるのがイヤで、できる限り
関数で間に合わせるつもりでした。
そのほかコンポーネント類と、これらの部品を使った簡単なアプリケーション
ソフトのソースもあります。
コンポーネント類はやっぱり無いと時間がかかるので一部社内でも作成しま
したが、大半はインターネットで落としたものを利用しています。
掲示板も作成しましたので、皆さん是非一度覗いてやって下さい。
サーバーも社内で立ち上げましたが、こちらは素人のため落ちていたら
ご勘弁。
--
中村 隆 <taka...@csjpn.com>
Hajime Nakane
前にソースを頂いた、仲根と申します。
金太郎プロジェクトのホームページのアドレスを
教えて頂けないでしょうか？
ソースを参考にしたいと思います。
お忙しいところ、宜しくお願い致します。
∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽
沖縄特産販売有限会社
仲根 一
〒901-0212
沖縄県豊見城市字平良240-152
Tel.(098)850-8953 Fax(098)850-1986
URL http://www.powerfood.co.jp 長寿県沖縄からのメッセージ
E-Mail: haj...@powerfood.co.jp みんなで元気になろう！！
∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽
Mr. Kazutaka Morono
諸農です。
中村さんじゃないですが、
[Delphi:89105] Re: 来年度の開発言語は？
を参考にすると良いと思います。
＃過去ログを調べることも一つの技術力ではないかと思っています。
> 今日は、中村さん
>
> 前にソースを頂いた、仲根と申します。
> 金太郎プロジェクトのホームページのアドレスを
> 教えて頂けないでしょうか？
> ソースを参考にしたいと思います。
> お忙しいところ、宜しくお願い致します。
>
> ∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽
> 沖縄特産販売有限会社
> 仲根 一
> 〒901-0212
> 沖縄県豊見城市字平良240-152
> Tel.(098)850-8953 Fax(098)850-1986
> URL http://www.powerfood.co.jp 長寿県沖縄からのメッセージ
> E-Mail: haj...@powerfood.co.jp みんなで元気になろう！！
> ∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽∽
■◇■◇■◇■◇■◇■◇■◇■◇■◇■◇■◇■◇■◇■◇■◇■◇■
◇ 諸農和岳 <k-mo...@mbm.nifty.com>
■ Kazutaka Morono - Osaka , Japan
◇
■ Microsoft MVP for Visual Developer C# (Oct 2004 - Sept 2007)
◇ 十兵衛＠わんくま同盟 http://blogs.wankuma.com/jubei/
■◇■◇■◇■◇■◇■◇■◇■◇■◇■◇■◇■◇■◇■◇■◇■◇■
中村 隆
> 金太郎プロジェクトのホームページのアドレスを
> 教えて頂けないでしょうか？
肝心のアドレスをかいてありませんでした。
です。
書きたいこと、確認しなくてはいけないことが沢山あるのですが、
なかなか進みません。この手の話は開発環境(バージョンなど)を
統一しないと「できる」「できない」の話が先に立って肝心な
コード共通化の話ができない場合が多いと思います。私が使っている
エンタープライズ版は一般の人は利用している人は少ないと思うので
他バージョン(Turbo版?)で動作するようにもしたいと考えています
--
中村 隆 <taka...@csjpn.com>
Yuichi Nakao
Km2Net製USB-IO対応 をDELPHIで制御したいと思っています。
http://km2net.com/usb-io/index.shtml
デジタル入出力の時間間隔は、100msもあれば充分です。
ネットで調べると、VBで動かす方法は見つかりましたが。
DELPHIで動かす方法がみつかりません。
VB用のDLLを DELPHIで使うしか方法はないでしょうか。
戸田 英夫
----- Original Message -----
From: "Yuichi Nakao" <nak...@mars.dti.ne.jp>
To: <Del...@ml.users.gr.jp>
Sent: Thursday, January 18, 2007 5:57 AM
Subject: [Delphi:89157] USB-I/O をDELPHIで使うには
> ネットで調べると、VBで動かす方法は見つかりましたが。
> DELPHIで動かす方法がみつかりません。
google で簡単に USB-IO Delhi をキーに検索すると複数のページがヒットしますが
もろ
Welcome to the world of Delphi USB
http://hpcgi2.nifty.com/ubax/delphi_usb/delphi_usb.cgi
てなページもありました。
---- (-_-)(-_-)(-_-) THE REAL PROGRAMMER (-_-)(-_-)(-_-) ----
At the beach, The Real Programmer is the one drawing flowcharts in the sand.
戸田 英夫 mailto: hideo...@ntt-neo.co.jp
Yuichi Nakao
> Welcome to the world of Delphi USB
> http://hpcgi2.nifty.com/ubax/delphi_usb/delphi_usb.cgi
たしかに、ここはすぐにヒットするんですが。
具体的なソースコードなどが書いてないので、
恥ずかしながら、私の技量ではまったく参考になりませんでした。
Takefumi-O
>http://km2net.com/usb-io/index.shtml
>デジタル入出力の時間間隔は、100msもあれば充分です。
>ネットで調べると、VBで動かす方法は見つかりましたが。
>DELPHIで動かす方法がみつかりません。
>VB用のDLLを DELPHIで使うしか方法はないでしょうか。
JEDIのコンポーネント群の中にTJvHidDeviceControllerという
USB I/Oコンポーネントがあります。
自分では使ったことがないのですが、ヒントになるかもしれま
せん。ご参考までに。
インストール後「System」タブに入ります。
-----------------------
Gracix [takefumi-o]
takef...@gracix.com
オオタ タケフミ
-----------------------
Katsuji Shirasaka
少し興味があったので ご紹介のurlを見てみました
リンク集のFeedSoft（http://www.ark-9.com/~feedsoft/）にあるDLLは 使用方
法にVBでの関数宣言も書いてありますから Delphiへのコンバートは比較的簡単
にできるんじゃないでしょうか
個人的にはこれを使うのがお手軽なように思います（無責任モード^^;）
VBとDelphiの型の違い等は 「Delphi Acid Floor」の「VBtoDelphi」あたりが
参考になると思います
http://www.wwlnk.com/boheme/
で、これだけじゃなんなので・・・usb_open/usb_closeだけ試してみました
USB-IOがありませんので usb_openの戻り値は2になりました
==========
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
private
{ Private 宣言 }
FUsbOpen: Integer;
public
{ Public 宣言 }
end;
var
Form1: TForm1;
function usb_open: LongInt; stdcall; external 'USBIOAC.DLL';
function usb_close: LongInt; stdcall; external 'USBIOAC.DLL';
implementation
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
begin
FUsbOpen := usb_open;
case FUsbOpen of
1: MessageDlg('hid.dll/setupapi.dll not found', mtError, [mbOk], 0);
2: MessageDlg('USB_IO not found', mtError, [mbOk], 0);
end;
end;
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
usb_close;
end;
end.
==========
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
白坂 勝治
e-mail:sira...@hi-ho.ne.jp
Nifty:QFG0...@Nifty.com
Yuichi Nakao
ソースコードまで書いていただきありがとうございます。
大変参考になります。
ネットで調べると。
VBで USB-IOのDLLを使っているソースコードはたくさん見つけたのですが
DELPHIでの使用例がなくて。。
VBで使っているDLLを、DELPHIでどうやって使うのか、
さっぱり見当が付かなくて悩んでいたところなんです。
早速USB-IOを注文して試してみます。
重ね重ね、ありがとうございます。
ByeOS工房 栄光堂 内野博行
きるようにしました。
但し、2年前に作成してほったらかしなのでプログラムの詳細は多分理解できません
ので、ご了承ください。
http://hpcgi2.nifty.com/ubax/delphi_usb/delphi_usb.cgi
Yuichi Nakao
ソースコード は大変参考になります。
ありがとうございました。
戸田 英夫
----- Original Message -----
From: "Takefumi-O" <takef...@gracix.com>
To: <Del...@ml.users.gr.jp>
Sent: Thursday, January 18, 2007 7:39 PM
Subject: [Delphi:89164] Re: USB-I/O をDELPHIで使うには
> JEDIのコンポーネント群の中にTJvHidDeviceControllerという
> USB I/Oコンポーネントがあります。
USB HID(Human Interface Device) ならインテルのページに
Delphi Implementation of HID Class
http://www.intel.com/intelpress/usb/Examples/Zipfiles/DELPHI_HID.htm
の zip が公開されています。