delphi

delphi

Delphi・メソッド

【ファイル関連メソッド】■FileExistsファイル存在チェックif FileExists(edtPath.Text) then //ファイルが存在すればTrue■CopyFileファイルのコピーCopyFile(PChar(sFromN...
delphi

ファイル削除

// F_Nm : 削除ファイル名if FileExists(F_Nm) then //存在確認begin DeleteFile(F_Nm);end;
delphi

ファイルコピー

Delphiにファイルをコピーする関数はないので、Windows APIのCopyFile関数を使用。書式:CopyFile(コピー元ファイル名,コピー先ファイル名,フラグ)フラグ Ture: コピー先に同名ファイルがある場合は、処理を中止...
delphi

delphi エラー処理

procedure TForm1.Button1Click(Sender: TObject);varLValueA : Integer;LValueB : Integer;LExceptRec : PExceptionRecord;LErr...
delphi

シフトキー判定

if GetAsynckeyState(VK_SHIFT) < 0 then begin....end;
delphi

画像回転

typeTRGBArray = array of TRGBTriple;PRGBArray = ^TRGBArray;// 左回転サンプルprocedure TForm1.Button1Click(Sender: TObject);varS...
delphi

画像種別変更

use節にJpegを追加uses Jpeg;//BmpからJpeg procedure TForm1.Button1Click(Sender: TObject);Var  Jpg : TJpegImage;  Bmp : TBitMap ;...
delphi

fastreport-pdf出力

dm.f_PDF.Title := ‘回収予定一覧’;//ファイル名dm.f_PDF.Subject := ‘回収予定一覧詳細’;//サブタイトルdm.f_PDF.Producer := ‘株式会社XXXXXXX’;//作成者dm.f_PD...
delphi

fastreportエクセルやPDF出力

dm.f_XLSE.FileName := ‘xxxxx’;//出力したいファイル名dm.f_Report.PrepareReport;dm.f_Report.Export(dm.f_XLSE);//出力形式….エクセルやPDF等…
delphi

構造体

private{ Private 宣言 }TypeTPersonData = recordfID :Integer;fName :String;end;procedure Tf_basic_l.lbl_titleClick(Sender: ...