'Programming/Delphi' 카테고리의 글 목록

[Tip] Delphi Coding Rule Guide

Abstract: This article documents a standard style for formatting Delphi code. It is based on the conventions developed by the Delphi team. Object Pascal Style Guide This article documents a standard style for formatting Delphi code. It is based on the conventions developed by the Delphi team. We take it for granted that many well established shops will have conventions different than those speci..

Programming/Delphi 2020. 1. 8. 23:00

[팁] 파일이 사용중인지 여부

파일이 사용중인지 여부 function IsFileInUse(fName : string ) : boolean; var HFileRes : HFILE; begin Result := false; if not FileExists(fName) then exit; HFileRes := CreateFile(pchar(fName), GENERIC_READ or GENERIC_WRITE,0, nil, OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL, 0); Result := (HFileRes = INVALID_HANDLE_VALUE); if not Result then CloseHandle(HFileRes); end; 사용예 : procedure TForm1.Button1Click(Sender: TOb..

Programming/Delphi 2020. 1. 8. 22:59

[팁] 숫자 1을 001로 표시하는 방법

1. Format 함수 사용 Edit1.Text := Format('%.3d', [StrToInt(Edit2.Text)]); 2. FormatFloat 함수 사용 Edit1.Text := FormatFloat('000', StrToInt(Edit2.Text));

Programming/Delphi 2020. 1. 8. 22:58

[팁] Text파일 읽기/쓰기(Read/Save)

텍스트 파일을 TStringList를 이용해 읽고/쓰기 function LoadFile(const FileName: TFileName): string; var StringList: TStringList; begin StringList := TStringList.Create; try StringList.LoadFromFile(FileName); Result := StringList.Text; finally StringList.Free; end; end; procedure SaveFile(const FileName: TFileName; const S: String); var StringList: TStringList; begin StringList := TStringList.Create; try String..

Programming/Delphi 2020. 1. 8. 22:57

[팁] 프로그램 재실행 방지

program setup; uses Forms, Windows, SetupMain in 'SetupMain.pas' {SetupMainForm}, Dlg in 'Dlg.pas' {DlgForm}, Config in 'Config.pas' {ConfigForm}, Info in 'Info.pas' {InfoForm}, NInput in 'NInput.pas' {NameInputForm}, NewCfg in 'NewCfg.pas' {NewForm}, FireMon in 'FireMon.pas' {Form1}, ComSetup in 'ComSetup.pas' {ComSetupForm}; {$R *.RES} { 아래의 코드부터 } var Mutex : THandle; begin Mutex := CreateMut..

Programming/Delphi 2020. 1. 8. 22:54

[Delphi] RadStudio 10.3 Jedi-project jcl install error

이번에 노트북에 RadStudio를 설치하게 되어서 JVCL을 설치하려고 하였는데 아래와 같이 오류가 발생하였습니다. jcl을 설치하면서 "The "source\include\jedi\jedi.inc" include file is outdated."" 란 오류입니다. 오랜만에 설치하는지라 한참을 찾아헤매었네요... 해결: https://github.com/project-jedi/ 에 접속하여 jedi에 들어갑니다. "clone or download"를 클릭하여 "Download Zip"을 클릭하여 "jedi-master.zip" 파일을 다운로드 받습니다. (* 이 곳에서 jcl과 jvcl을 다운로드 받으시면 정식 Release버전은 아니지만 최신버전을 받을수 있습니다.) "jedi-master.zip" ..

Programming/Delphi 2020. 1. 2. 22:28

[델파이] Delphi 버전별 Define [Update:2019/11/25]

Product Name Version Conditional Define Compiler Version Embarcadero RAD Studio 10.3 Rio 26.0 VER330 33 Embarcadero RAD Studio 10.2 Tokyo 25.0 VER320 32 Embarcadero RAD Studio 10.1 Berlin 24.0 VER310 31 Embarcadero RAD Studio 10 Seattle 23.0 VER300 30 Embarcadero RAD Studio XE8 22.0 VER290 29 Embarcadero RAD Studio XE7 21.0 VER280 28 Embarcadero RAD Studio XE6 20.0 VER270 27 Embarcadero RAD Stud..

Programming/Delphi 2019. 11. 25. 19:12

[델파이] 엠바카데로, RAD스튜디오 10.3.3 출시

엠바카데로, RAD스튜디오 10.3.3 출시… 64비트 안드로이드 앱 개발과 더욱 강화된 멀티-티어 지원 기능 크로스-플랫폼 애플리케이션 개발 도구를 공급하는 엠바카데로(아이데라에서 인수)는 22일 RAD스튜디오 10.3.3 출시를 발표했다. RAD스튜디오 10.3 리오 버전의 세번째 업데이트인 이번 10.3.3 버전에는 안드로이드 64비트와 도커 컨테이너(Docker container) 지원 기능이 새롭게 추가되었다. 10.3.3 버전은 안드로이드 용 64비트 앱을 개발해 구글 플레이 스토어에 배포하는 데 필요한 모든 안드로이드 앱 개발 기능을 제공한다. 단 하나의 코드베이스만으로 64비트 앱은 물론 iOS, 안드로이드, 윈도우, 맥OS, 리눅스 용 앱까지 개발해 동시 배포할 수 있다. RAD스튜디오 ..

Programming/Delphi 2019. 11. 25. 02:51

[Tip] TComport USBTo232 제거시 PurgeComm function failed 현상 해결

CPort 컴퍼넌트사용할때 USBTo232포트를 제거하는 경우 "PurgeComm function failed(Error:22)" 에러가 발생합니다. Component CPort.PAS 파일에서 아래와 같이 예외처리를 추가 해주면 오류를 해결할수 있습니다. 원본: procedure TCustomComPort.AbortAllAsync; begin try if not PurgeComm(FHandle, PURGE_TXABORT or PURGE_RXABORT) then //raise EComPort.Create CallException(CError_PurgeFailed, GetLastError); end; 수정: procedure TCustomComPort.AbortAllAsync; begin try if no..

Programming/Delphi 2019. 6. 4. 00:05

[Tip] TEdit에서 영어만 입력하려고 하려면...

TEdit ImeMode 속성을 imDisable로 지정하면 영어외의 언어는 입력이 안됩니다. 즉, 영어/숫자/특수기호 외에 다국어 지원이 되질않습니다.

Programming/Delphi 2019. 5. 7. 12:10

[팁] CSV파일 TStringList로 읽고 쓰기

procedure SaveToCSVFile(sGrid: TStringGrid; sCsvFile:string); var i: Integer; sLst: TStringList; begin sLst:=TStringList.Create; try begin for i:=0 to sGrid.RowCount -1 do begin sLst.Add(sGrid.Rows[i].CommaText); end; sLst.SaveToFile(sCsvFile); end finally sLst.Free; end; end; procedure LoadFromCSVFile(sGrid: TStringGrid; sCsvFile:string); var i: Integer; sLst: TStringList; sCols: TStringList; b..

Programming/Delphi 2017. 9. 4. 00:25

[팁] 델파이 Pre Define

The following standard conditional symbols are defined:CategorySymbolDCC32 DCC64 Since XE2 DCCOSX Since XE2 DCCIOSARM Since XE3 DCCIOS32 Since XE3 DCCAARM In XE5 DCCIOSARM64 Since XE8 CommentsCompilerDCCDEFINEDDEFINEDDEFINEDDEFINEDDEFINEDDEFINEDDEFINEDVER300 For a list of compiler versions, see Compiler Versions.DEFINEDDEFINEDDEFINEDDEFINEDDEFINEDDEFINEDDEFINEDFor Delphi Seattle, compiler has VE..

Programming/Delphi 2017. 2. 28. 19:44

델파이 32bit(x86), 64bit(x64) 구분

{$IFDEF CPUX86}...{$ENDIF CPUX86}{$IFDEF CPUX64}...{$ENDIF CPUX64}

Programming/Delphi 2017. 2. 24. 21:26

[사이트] 한국 델파이 사이트

1. 델마당 : www.delmadang.com2. 한국 델파이 개발자 모임 : www.delphi.co.kr3. 델파이 포럼 : delphi.borlandforum.com

Programming/Delphi 2015. 1. 15. 20:52

큰꼼의 세상