배상영블로그

Selected Plaform에서 32 / 64 bit 선택

Delphi Options - Library - Library path 우측 버튼 클릭

Greyed items denote invalid path 우측 버튼 클릭

zeos 폴더에서 아래 경로 Add

ZEOS PATH\packages\DelphiXE2

ZEOS PATH\packages\DelphiXE2\Build

ZEOS PATH\packages

ZEOS PATH\src

ZEOS PATH\src\component

ZEOS PATH\src\core

ZEOS PATH\src\dbc

ZEOS PATH\src\parsesql

ZEOS PATH\src\plain

ZEOS PATH\packages\DelphiXE2\ZeosDbo.groupproj 프로젝트 열기

64bit의 경우 Project Manager에서 Target Platforms에 Win64 추가하여 변경

ZeosDbo - Compile All

ZComponentDesign160.bpl - Install

64bit의 경우 이부분의 Target Platforms는 32bit로 선택해야 error가 나지 않음

TZConnection - LibraryLocation에 반드시 32bit / 64bit dll을 포함하여 배포하여야 함

uses Variants;

function VarToStr(const V : Variant) : string;

function VarToStrDef(const V : Variant; const ADefault : string) : string;

Saving an image in a certain format (such as JPEG or PNG) takes a couple of steps in the C++ version. You would have to enumerate all encoders that are installed on the system to find the encoder you are interested in. This enumeration would also take a couple of steps. For standard formats like BMP, GIF, JPEG, PNG and TIFF, this library allows you the specify the format directly without any encoder enumeration:

var
  Bitmap: IGPBitmap;
begin
  Bitmap := TGPBitmap.Create(200, 100);
  Bitmap.Save('Output.png', TGPImageFormat.Png);
end;

You can still enumerate encoders if you need to. This has been simplified too since the class function TGPImageCodecInfo.GetImageEncoders returns an array of all installed encoders:

var
  Bitmap: IGPBitmap;
  Codec: IGPImageCodecInfo;
begin
  Bitmap := TGPBitmap.Create(200, 100);
  for Codec in TGPImageCodecInfo.GetImageEncoders do
    if SameText(Codec.MimeType, 'image/targa') then
    begin
      Bitmap.Save('Output.tga', Codec);
      Break;
    end;
end;

출처 : http://www.bilsen.com/gdiplus/index.shtml

mysql.exe 실행시 아래 오류가 뜰 경우 

mysql> use mysql;

mysql> grant all privileges on *.* to 'account'@'%' identified by 'password';

mysql> flush privileges; 

* 이동

MoveFile(PChar('C:\test.txt'), PChar('D:\test_copy.txt'));

* 삭제

DeleteFile(PChar('C:\test.txt'));

* 복사

CopyFile(PChar('C:\test.txt'), PChar('D:\test_move.txt'), False);

False : overwrite

Edit - Preferences - SQL Queries - Query Results

unchecked "Limit Rows"