프로그래밍 노트

델파이의 리스트박스에서 VB의 ItemData의 기능을 쓰려면 어떻게 하나 찾아보니까 방법이 있었다. ListBox1.Clear; ListBox1.Items.AddObject('사자', TObject(10)); ListBox1.Items.AddObject('호랑이', TObject(20)); ListBox1.Items.AddObject('곰', TObject(35)); 이런식으로 자료를 넣고서 데이터를 가져올때는 밑의 방법으로 가져온다. iID := LongInt(ListBox1.Items.Objects[0]); 그러면 iID에 10이 대입된다. 델파이의 리스트박스에서 아이템을 추가할 때는 아이템별로 오브젝트를 넣을 수 있어서 리스트박스에 추가하는 아이템 하나에 더 많은 정보를 입력할 수 있다.

ANSI SQL 데이터형 Microsoft Access 데이터형 별명 Microsoft SQL Server 데이터형 BIT, BIT VARYING BINARY VARBINARY, BINARY VARYING BIT VARYING BINARY, VARBINARY 미지원 BIT BOOLEAN, LOGICAL, LOGICAL1, YESNO BIT 미지원 TINYINT INTEGER1, BYTE TINYINT 미지원 COUNTER AUTOINCREMENT - 미지원 MONEY CURRENCY MONEY DATE, TIME, TIMESTAMP DATETIME DATE, TIME DATETIME 미지원 UNIQUEIDENTIFIER GUID UNIQUEIDENTIFIER DECIMAL DECIMAL NUMERIC, ..

데이터형 크기 설명 BINARY 1 바이트 어떤 데이터형도 저장될 수 있는 데이터형. 어떻게 데이터를 넣느냐에 따라서 데이터를 가져올때도 그에 맞게 가져와야된다. (문자당 1바이트) BIT 1 바이트 예/아니오 값 TINYINT 1 바이트 0 ~ 255 정수값 MONEY 8 바이트 –922,337,203,685,477.5808 ~ 922,337,203,685,477.5807 정수값 DATETIME 8 바이트 100 ~ 9999 사이의 날짜 시간값 UNIQUEIDENTIFIER 128 비트 원격 프로시져 호출시 키 넘버로 사용 REAL 4 바이트 단정도 부동소수 음수값 –3.402823E38 ~ –1.401298E-45, 양수값 1.401298E-45 ~ 3.402823E38, 0 FLOAT 8 바이트 배..

델파이로 MDB 데이터베이스 만들기 MDB 패스워드 설정하기 MDB 패스워드 변경하기 MDB 최적화하기 uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ComObj, ActiveX, StdCtrls; // 데이터베이스 생성(MDB) function CreateDB(const sPath: string; var sErr: string): Boolean; const csConnStr = 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source="%s"'; var oleCatalog: OleVariant; sConnStr: string; begin Result := false;..

델파이에서 동적으로 배열 컨트롤을 만들었을 때의 컨트롤 유무 체크 하는 방법 VB에서는 어떤 오브젝트가 생성되었는지 안되었는지 알기위해서는 IsObject라는 함수가 있다. 델파이에서는 배열 컨트롤이 있는지 없는지 체크하기 위해서는 밑의 소스처럼 is를 사용수 있다. procedure TForm2.Button1Click(Sender: TObject); begin if btnD[3] is TObject then btnD[3].Caption := 'ttttt'; end;

■ 시리얼 포트 오픈 시리얼 포트는 파일처럼 다룬다. 시리얼 포트를 오븐 하기위해서는 CreateFile()을 사용한다. HANDLE CreateFile( LPCTSTR lpFileName, // 포트 이름을 가르키는 버퍼의 포인터 DWORD dwDesiredAccess, // 억세스모드(READ, WRITE) DWORD dwShareMode, // 포트의 공유 방법 비정（공유 불가: 0으로 설정） LPSECURITY_ATTRIBUTES lpSecurityAttributes, // 시큐리티 속성 DWORD dwCreationDisposition, // 포트 여는 방법 지정（OPEN_EXISTING로 기존 파일 지정） DWORD dwFlagsAndAttributes, // 포트의 속성 지정 HANDLE h..

델파이에서 동적으로 컨트롤 만드는 두가지 방법 밑의 소스의 ①과 ②를 보면 컨트롤을 동적으로 만드는 법이 두가지가 있다. ①처럼 바로 컨트롤을 만드는 방법과 ②처럼 기존에 동적 배열 컨트롤을 정의해 두고 배열의 크기를 설정해서 컨트롤을 만드는 방법이 있다. 이 프로그램을 실행시켜서 컨트롤 키를 누르고 마우스를 클릭하거나 컨트롤 키를 누르지 않고 마우스를 클릭하면 동적으로 컨트롤들이 폼에 생성되어진다. 그리고 그렇게 생성되어진 컨트롤을 클릭하면 각 컨트롤의 캡션이 폼의 캡션에 표시되어진다. unit Unit2; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, stdctrls, E..

델파이 XML Data Binding으로 xml 파일 조작하기 소스를 열어둔 상태에서 Tool Palette를 보면 Delphi Projects | XML이 있다. 그 밑에 XML Data Binding이 있다. 그것을 클릭한다. 그러면 아래 윈도우가 표시되어지고 조작할 XML 파일을 선택하고 "Next" 버튼을 누른다. XML Data Binding Wizard 화면에서도 특별히 고치지 않고 "Next" 버튼을 누른다. 그러면 아래와 같이 새로운 pas파일이 생성되면서 조금전에 선택한 XML 파일의 조작하기 쉽게 xml 파일이 바인딩된다. 그리고 이 바인딩된 xml 파일을 사용하고자 하는 곳에 추가된 unit명과 xmldom, XMLIntf, XMLDoc을 uses에 추가해야 된다. xml Data B..

델파이에서 프로그램이 있는 패스(디렉토리) 얻기 procedure TForm1.FormCreate(Sender: TObject); var CurrentPath : array [0..256] of char; begin // 프로그램이 있는 현재의 디렉토리 정보 얻기 GetCurrentDirectory(sizeof(CurrentPath), CurrentPath); Form1.Caption := CurrentPath; end;

델파이에서 XMLDocument 컴포넌트를 사용해서 XML 파일 불러 TreeView에 표시하는 소스 ■ XML 파일 불러오기 // XML 파일 읽어오기 procedure TForm1.Button2Click(Sender: TObject); Var xdSoft : TXMLDocument; begin OpenDialog1.Filter := 'Xml file|*.xml'; if OpenDialog1.Execute then begin // XML Document 만들기 xdSoft := TXMLDocument.Create(Application); // XML Document 불러오기 xdSoft.LoadFromFile(OpenDialog1.FileName); xdSoft.Active := True; // Tre..