본문 바로가기

Developist

Delphi/꿀팁 HotKey 등록해서 쓰기 핫키를 저장해 놓을 변수와 핫키를 확인하는 함수를 선언합니다. TForm1 = class(TForm) .. procedure FormCreate(Sender: TObject); procedure FormDestroy(Sender: TObject);private nHotKeyF2 : Integer; procedure WMHotKey(var Message: TWMHotKey); message WM_HOTKEY;end;핫키를 등록합니다.procedure TForm.FormCreate(Sender: TObject);begin nHotKeyF2 := GlobalAddAtom('DevelopistF2'); //윈도우에 나만의 핫키를 만듭니다. RegisterHotkey(Handle, nHotKeyF2, 0, VK_..
Ext SecretBox
Delphi/끄적이기 Ext SecretBox 은행에서 보안상의 이유로 보안프로그램이 문서에 관련된 파일만 골라 죄다 지워버리는 현상을 날마다 겪으니언제 내 작업 문서들이 날아갈지 모르는 스트레스가.. 하.. 그래서 편법으로간단하게 상자에 드래그 하면 파일의 확장자를 제거하고 파일의 정보를 저장했다가확장자가 제거된 파일을 다시 드래그 하면 파일을 원상복구 시키고 열어주는프로그램을 만들었다. 사용법도 매우 간단해서상자를 아무곳이나 드래그해서 옮겨놓고 변환하고 싶은 파일을 전부 드래그해서한방에 쑤셔넣으면 된다^0^
수동으로 DataSet 만들고 컨트롤 하기
Delphi/꿀팁 수동으로 DataSet 만들고 컨트롤 하기 예제에선 따로 서버연결이 필요없는 MemTable을 사용하였습니다. 1. MemTable과 데이터를 연결해서 보여줄 DBGrid, DataSource를 생성하고 연결시켜 줍니다.DataSource1.DataSet := FDMemTable1;DBGrid1.DataSource := DataSource1;2. 필드를 생성합니다.procedure TForm1.btnCreateFieldClick(Sender: TObject);begin with FDMemTable1 do begin Close; FieldDefs.Clear; FieldDefs.Add('StringField', ftString, 10); FieldDefs.Add('IntegerField', ftInteger, 0); CreateDataSet; end..

티스토리툴바