가장 유명한 VCL, .Net 컴포넌트의 대명가(?)에서 현재 .Net버전의 무료 버전을 배포하고 있네요

종류는 많지는 않습니다 대략 60가지...

정품을 구매하지 않은 사용자가 기본 컴포넌트 대체할려고 하면 좋을 것 같습니다.

메뉴를 통해서 들어가볼려고했지만

어디에 위치한지 몰라 링크 걸어둡니다.

https://www.devexpress.com/Products/Free/NetOffer/

그럼, 필요하신 분은 잘 사용하시기 바랍니다.

이 글은 스프링노트에서 작성되었습니다.

이 글 작성 당시에는 무료 컴포넌트가 제공 되었으나, 지금 현재는 정품 트라이얼 버전 링크로 수정 되었습니다.

C#에서 현재 경로를 알아내는 방법은 여러가지가 있다.

1. System.Environment.CurrentDirectory

가장 쉽게 현재 실행 경로를 알아낼 수 있는 방법이다. 하지만 이 방법은 Register에 등록된 프로그램으로 실행되면 다른 값을 출력한다. 이때는 3번 Application.StartupPath를 이용해야 한다.

* 루트일 경우에는 ‘\’ 반환, 그 외의 경우에는 폴더명까지만 반환한다.

• C:\
  
• C:\TestFolder\MyApp

2. System.IO.Directory.GetCurrentDirectory()

1번과 동일하다.


3. Application.StartupPath

위의 Register에 등록되었을 때도 정상적으로 자신의 시작 경로를 반환한다. 하지만 이는 Window Forms를 사용할 때만 Application 클래스를 사용할 수 있기 때문에 Console 기반 혹은, 클래스 라이브러리 기반에서는 사용이 불가능하다.

Tip. Application.ExecutablePath
현재 실행된 어플리케이션의 실행 파일의 위치이다. C:\Test\App.exe 와 같이 출력된다. 이 정보는 현재 경로가 아니기 때문에 변경되지 않는다.

 출처 : http://pureholic.net/2010/04/how-to-kwow-startpath-in-csharp/

이 글은 스프링노트에서 작성되었습니다.

Form Style - fsStayOnTop 효과

 SetWindowPos(Handle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE or SWP_NOSIZE)

<-> SetWindowPos(Handle, HWND_NOTOPMOST, 0, 0, 0, 0, SWP_NOMOVE or SWP_NOSIZE);

출처 :  http://www.delmadang.com/community/bbs_view.asp?bbsNo=17&bbsCat=41&indx=405581&keyword1=fsStayOnTop&keyword2=

이 글은 스프링노트에서 작성되었습니다.

 폼 소스 부분은 생략하고 처리부분만 기술한다.

• Form Style : fsStayOnTop
• 해당 폼을 TObject 형태로 구현 함수로 넘긴다
  (경우에 따라서 TForm으로 넘기던지 상속클래스 만들어서 넘기던지...그건 알아서...단, 구현부분 파라메터 타입과 구현부분도 거기에 맞추어서 ^^)

 구현 부분

1. procedure ShowSaveDialogBox(Sender : TObject = nil)
2. var
3. saveDlg : TSaveDialog;
4. SenderFormStyle : TFormStyle;
5. isSenderFormStyleChange : Boolean;
6. begin

7. isSenderFormStyleChange := False;

   if (Sender <> nil) and Assigned(Sender) and (Sender is TForm) then

   saveDlg := TSaveDialog.Create(TForm(Sender))

   else

   saveDlg := TSaveDialog.Create(nil);

8. saveDlg.Title := '파일 저장';
9. saveDlg.Filter := 'TEXT 파일|*.txt';
10. saveDlg.DefaultExt := 'txt';
11. saveDlg.Options := saveDlg.Options + [ofOverwritePrompt];
12. saveDlg.FileName := 'ExportText' + '.xls';
13. if (Sender <> nil) and Assigned(Sender) and (Sender is TForm) and (TForm(Sender).FormStyle = fsStayOnTop) then
14. begin
15. //BEGIN 1안. 폼을 아래로 위치 시킨다(사라지는 효과 나타남)
16. TForm(Sender).SendToBack;
17. isSenderFormStyleChange = True;
18. //END 1안.
19. //BEGIN 2안. 폼을 일반 폼으로 변경함(화면이 심하게 깜빡거리는 단점)
    SenderFormStyle := TForm(Sender).FormStyle;
20. isSenderFormStyleChange := True;
21. TForm(Sender).FormStyle := fsNormal;
22. Application.ProcessMessages; //(생략가능 혹시나 해서.....^^;;)
23. //END 2안.
24.  end;
25. if saveDlg.Execute then
26. begin
27.  {처리 코드}
28. end;

29. if isSenderFormStyleChange = True then

    begin

30. //1안.
31. TForm(Sender).BringToFront;
32. //2안.
33. TForm(Sender).FormStyle := SenderFormStyle;
34. Application.ProcessMessages; //(생략가능 혹시나 해서.....^^;;)
35. end;
36. end;

출처 : 자작(userpark)

이 글은 스프링노트에서 작성되었습니다.

 Showmessage 박스 Owner가 Application으로 되어져 있는 현상 때문에 Form이 StayOnTop일 경우 아래에 숨어버리는 현상 발생

해결 방법은 아래 소스.... Screen.ActiveForm을 이용한 방법

1. TForm1 = class(TForm)
2. {...생략...}
3. procedure OnScreenActiveFormChange(Sender: TObject);
4. private
5. {...생략...}
6. protected
7. {...생략...}
8. public
9. {...생략...}
10. end;
12. procedure TForm1.FormCreate(Sender: TObject);
    begin
13. Screen.OnActiveControlChange := OnScreenActiveFormChange;
14. end;
16. procedure TfrmUbBase_S.OnScreenActiveFormChange(Sender: TObject);
17. begin
18. if Assigned(Screen.ActiveForm) and ( (UpperCase(Screen.ActiveForm.ClassName) = UpperCase('TMessageForm')) ) then
19. begin
20. SetWindowPos(Screen.ActiveForm.Handle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE or SWP_NOSIZE);
21. end;
22. end;

출처 : 델마당 for Modify By Userpark

이 글은 스프링노트에서 작성되었습니다.

 Showmessage 박스 Owner가 Application으로 되어져 있는 현상 때문에 Form이 StayOnTop일 경우 아래에 숨어버리는 현상 발생

해결 방법은 아래 소스.... Screen.ActiveForm을 이용한 방법

1. TForm1 = class(TForm)
2. {...생략...}
3. procedure OnScreenActiveFormChange(Sender: TObject);
4. private
5. {...생략...}
6. protected
7. {...생략...}
8. public
9. {...생략...}
10. end;
12. procedure TForm1.FormCreate(Sender: TObject);
    begin
13. Screen.OnActiveControlChange := OnScreenActiveFormChange;
14. end;
16. procedure TfrmUbBase_S.OnScreenActiveFormChange(Sender: TObject);
17. begin
18. if Assigned(Screen.ActiveForm) and ( (UpperCase(Screen.ActiveForm.ClassName) = UpperCase('TMessageForm')) ) then
19. begin
20. SetWindowPos(Screen.ActiveForm.Handle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE or SWP_NOSIZE);
21. end;
22. end;

출처 : 델마당 for Modify By Userpark

이 글은 스프링노트에서 작성되었습니다.

출처 : 위키백과 - 대한민국의 전화번호 체계

PDF : 대한민국의_전화번호_체계.pdf

이 글은 스프링노트에서 작성되었습니다.

URL Encoding Reference

URL Encoding Reference

The ASCII device control characters %00-%1f were originally designed to control hardware devices. Control characters have nothing to do inside a URL.

출처 : w3schools(http://www.w3schools.com/tags/ref_urlencode.asp)

이 글은 스프링노트에서 작성되었습니다.