Delphi , Kylix , C++Builder , JBuilder など、Borland 製品に関する最新情報
内容: USB-IOとLDCの時計表示のDelphi6用ソースファイルを公表しますのでご自由にお使いください。 「Button1」はプログラム終了です。 「Panel3」(下段)クリックでPCの内部時計(西暦・月日・曜日・時間)の情報をリアルタイムに連続してLCDに転送し続けます。 (LCDの表示が刻々と変化します。) (同一のプログラムで4bit接続、8bit接続ともに正常に動作します。) 「Panel1」(上段)は8bit接続時のみLCDに「Delphi USB world、 UBAX community」と表示します。 「Panel2」(中段)は何も動作しません。 (注意) 2年前に作成したままなのでプログラムの詳細を殆ど忘れてしまっていますので、ご了承ください。 このスレを書き込む時点で実際にハードを引っ張り出して、コンパイルと動作確認だけしてみました。 http://home
中村@NECさんの、[builder-ML:4674] からの引用です。 (1) Scaled = False, AutoScroll = False フォームのフォントの大きさ、フォームのクライアント領域、 コントロールの大きさは設計時のピクセル単位のサイズが そのまま使われる。 (2) Scaled = False, AutoScroll = True (1) とほとんど同じだが、フォームは Width と Height で大きさが 設定されるので、タイトルバーの高さ、枠の幅、メニューの高さ によりクライアント領域の大きさが若干かわるので、場合によっては コントロールがはみ出したりする。 (3) Scaled = True, AutoScroll = False フォームのフォントの大きさ、フォームのクライアント領域、 コントロールの大きさは設計時のピクセル単位のサイズに フォントの大
いつか使うかもしれないのでコピペ。 http://hibari.2ch.net/test/read.cgi/tech/1309101455/752-772 752 デフォルトの名無しさん [sage] 2011/11/10(木) 21:16:07.18 ID: Be: ショートカットキーでctrl+1って設定した時に、テンキーの1じゃ反応しないんだけど何で? 759 デフォルトの名無しさん [sage] 2011/11/11(金) 13:16:58.52 ID: Be: >>752 キーボード内部でのIDが違う的な話でしょ。 760 デフォルトの名無しさん [sage] 2011/11/11(金) 17:18:34.27 ID: Be: >>759 ㌧です。 そういう時はキープレスか、キーダウンとかで監視しするってことか。 761 760 [sage] 2011/11/11(金) 23:5
1.TTimerとTImageをFormに貼り付けてください。 2.フォームの変数宣言で private { Private 宣言 } panelMoveX:integer; panelStr:string; を宣言してください。 3.TTimerのOnTimerイベントで下記のソースを入力して実行してください procedure TForm1.Timer1Timer(Sender: TObject); begin PanelStr := 'ABC'; //出力文字列 PanelMoveX := PanelMoveX - 1; //移動量計算 if (Image1.Canvas.TextWidth(PanelStr) + PanelMoveX < 0) then PanelMoveX := Image1.Width; with Image1.Canvas do begin Brush.Co
さて、プログラムは基本的なものばかりでつまらないと思いますので、 いよいよ簡単なタイピング「AからZまでをタイピングする!」というプログラムを考える事にします。 これはハッキリ言っていままでの知識を使えばさほど難しくはありません。 キーボードが押された時はどうすればいいの?と思うでしょうけど、実はすごい簡単です。 ボタンがクリックされた時のイベントと同じように、フォームのイベントに、 キーボードが押されたらというイベントがありますので、そこに書けばいいだけなのです。 フォームの「オブジェクト インスペクタ」を見て下さい。フォームのどこでもいいのでクリックすると切り替わるはずです。 次のような画面になると思います。 このような画面になると思います。 ちなみにこれは何度も言うように「Delphi5」のものです。「Delphi3」などでは、 「OnMouseWheel」(マウスホイールを感知する
Right 部分文字取り出し Right 関数は指定した文字列の右端から指定文字数分取り出します。 Delphi では Copy 関数を使用します。 Copy 関数は文字列の右端から取り出すのではなく Mid 関数のように指定位置から指定文字数分の文字列を返します。 procedure TForm1.Button1Click(Sender: TObject); var S1, S2 : string; SW : WideString; begin S1 := 'Borland Delphi 5 Enterprise Edition'; S2 := Copy(S1,9,6); // "Delphi" S1 := 'プログラマの気炎'; S2 := Copy(S1,13,4); // "気炎" SW := 'プログラマの気炎'; S2 := Copy(SW,7,2); // "気炎" end;
2013年02月10日14:16 カテゴリPowerShell [PowerShell]Ctrl + Cにて処理を中断した際に処理を拾う while ($true){ write-host "Processing..." if ([console]::KeyAvailable) { $key = [system.console]::readkey($true) if (($key.modifiers -band [consolemodifiers]"control") -and ($key.key -eq "C")) { #Ctrl + C が押された "Terminating..." break } } } keeji_ikuradon コメント( 0 )トラックバック( 0 ) 2012年09月27日18:53 カテゴリVB.NET [VB.NET]vbCrLfにてSplitする 文字
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く