2011年2月28日月曜日

MS SQL Server テーブル一覧の取得

select name
from sysobjects
where xtype = 'U'
order by name

Delphi ADOのConnect接続文字列のウィザード

procedure TADODBTest.EditConnStrClick(Sender: TObject);
begin
Connection.Close;
Connection.ConnectionString := ConnectionString.Text;
if EditConnectionString(Connection) then
begin
ConnectionString.Text := Connection.ConnectionString;
ConnectionStringClick(Sender);
end;
end;

上記で接続文字列のウィザードが表示される

2011年2月24日木曜日

FileListGet

FileListGet関数
指定したフォルダ内のファイル名を取得する場合に使用する。

1.一次元ベクトル変数を作成します。
2.FileListGetで1番に作成したベクトルに代入
項目更新 1番の変数 FileListGet(フォルダ名, 抽出拡張子※1, サブフォルダ対象判定※2)

3.VecSizeでベクトルレコード分、処理を行う
BlockのWhileを使用しても良いが、タスクにした方が後でメンテしやすい。
終了条件:VecSize(BB)
4.VecGetで取り出し
レコード後処理で、VecGet(1番の変数,Counter(0)) で取り出し出来る。

確認Ver:MAGICv9

2011年2月22日火曜日

UniPaas 実行時のPFキーの動作がおかしい

UniPaas 実行時のPFキーの動作がおかしい時がある。

サブフォームのシステムメニューはNoにしていたが
メインフォームのシステムメニューがYesになっていた。
上記により、メインフォームのWindowsシステムメニューにカーソルが
パーキングしているから、キーが無効になっていた。

対応:メインフォームもシステムメニューをNoにすること

IIS7 Express

以下のリンクが詳しい
http://blogs.msdn.com/b/osamum/archive/2011/01/19/iis-7-5-express.aspx

WindowsXPでも、IIS7相当の機能

2011年2月21日月曜日

MAGIC LIKE関数

文字列の比較(パターンマッチング)

文字列が指定したパターンに一致するかどうかを判断し、論理値を返します。

パターンには、通常の文字とワイルドカード文字を含めることができます。次の文字がワイルドカードに使用されます。

* … 0個以上の文字列
? … 1個の文字

SQLのWHERE句にLIKE文を記述出来る。

確認Ver:MAGICv9.4Plus

2011年2月17日木曜日

Delphi Open Source Projects synapse

ネットワークアクセスコンポーネント

ライセンス:修正BSD
http://ararat.cz/synapse/doku.php/start