본문 바로가기

Developist

Delphi/꿀팁 DirectoryListBox 파일 목록 컨트롤하기 TDirectoryListBox의 Items 프로퍼티를 이용해 리스트에 보이는 파일목록을 컨트롤 할 수 있습니다. ex) procedure TForm1.DirectoryListBox1Change(Sender: TObject); begin //Drive Root에서 시작할 경우 선택한 하위폴더가 최상위로 고정되도록 한다. DirectoryListBox1.Items.Delete(0); end;
Delphi/간단하게 간단하게 Task로 작업하고 원하는 결과값 리턴 받기 uses .., System.Threading; TDevelopistTask = class public class function FuncWait(const AFunc: TFunc): T; static; end; class function TDevelopistTask.FuncWait(const AFunc: TFunc): T; var oFuture: IFuture; begin oFuture := TTask.Future(AFunc); Result := oFuture.Value; end; 사용법 - 결과값이 리턴될 때까지 대기상태이므로 적절하게 사용하시면 됩니다. if TDevelopistTask.FuncWait( function :Boolean begin Result := False; //to do.. Re..
[DevExpress] Skin Button
Delphi/끄적이기 [DevExpress] Skin Button Dev사 cxButton에 Custom Skin을 씌우려면 SkinEditor로 기존 버튼 이미지나 세팅을 바꿔줘야 하는데, 이게 또 한 스킨당 기본으로 한개씩 밖에 적용이 안된다.. 컴포넌트마다 추가해준다고 스킨을 여러개 생성하기엔 효율이 떨어지는 것 같아서 한 스킨에 Element를 여러개 등록해 두고 SkinElement Name으로 스킨을 바로바로 적용 및 변경할 수 있도록 커스텀 버튼을 새로 만들었다..^^

티스토리툴바