::: µ¨ÆÄÀÌ Tip&Trick :::

µ¨ÆÄÀÌ Tip&Trick ¼º°Ý¿¡ ¸ÂÁö ¾Ê´Â ±¤°í,ºñ¹æ,Áú¹®ÀÇ ±ÛÀº Áï½Ã »èÁ¦Çϸç
³»¿ëÀ» º¹»çÇÏ¿© »ç¿ëÇÒ °æ¿ì ¹Ýµå½Ã À̰÷(http://www.howto.pe.kr)À» Ãâó·Î ¸í½ÃÇÏ¿© ÁÖ¼¼¿ä


Category

  ±è¿µ´ë(2003-03-04 20:25:46, Hit : 4691, Vote : 1325
 µµ±¸¸ðÀ½ Bar´Â ¾î¶»°Ô ¸¸µå´ÂÁö...

> MS Office 97À» ½ÇÇàÇϸé È­¸é ¿ìÃø¿¡ µµ±¸¸ðÀ½ÀÌ »ý±â Àó¾Æ¿ä?
> ±×·± µµ±¸¸ðÀ½ Bar´Â ¾î¶»°Ô ¸¸µå´ÂÁö?
> µµ±¸¸ðÀ½À» ÁÂÃø ¶Ç´Â À§·Î ¿òÁ÷ÀÌ¸é ¹ÙÅÁÈ­¸éÀÌ ¿ìÃø ¶Ç´Â ¾Æ·¡·Î µµ±¸¸ðÀ½
> ÆøÀ̳ª
> ³ôÀ̸¸Å­ Á¶±Ý¾¿ À̵¿Çϴµ¥ ±× 󸮴 ¾î¶»°Ô ÇÏ´ÂÁö¿ä...
> ´äº¯Àº park6394@Unitel.co.kr ¶Ç´Â dragon@ahone.co.kr·Î º¸³» ÁÖ¼¼¿ä..
> ±×·³ ºÎŹ µå¸³´Ï´Ù....
´ÙÀ½ source´Â Á¦°¡ Å×½ºÆ® ÇÑ ³»¿ëÀ̱¸¿ä, ¾Æ·¡ source¿¡
ÇѰ¡Áö ºüÁø ³»¿ëÀÌ ÀÖ½À´Ï´Ù(Àú¸¸ ´ÙÇϸé Àç¹Ì ¾øÀ¸´Ï±î...)
±×°Ç formÀ» desktopÀÇ ÁÂ,¿ì,»ó,ÇÏ·Î À̵¿ÇÒ ¶§ formÀÇ
ÇüŰ¡ ¹Ù²î´Â °ÍÀε¥ ±×°ÍÀº ¾Æ·¡ source¿¡ ÁÖ¼®Ç¥½Ã°¡
µÈ °÷À» Âü°íÇϼ¼¿ä.
±×·³ ÁÁÀº °á°ú Àֱ⸦...


unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, Buttons;

type
  TForm1 = class(TForm)
    BB_Calc: TBitBtn;
    BB_Close: TBitBtn;
    BB_notepad: TBitBtn;
    Label1: TLabel;
    Label2: TLabel;
    procedure BB_CloseClick(Sender: TObject);
    procedure BB_CalcClick(Sender: TObject);
    procedure BB_notepadClick(Sender: TObject);
  private
    { Private declarations }
    procedure CreateParams(var Params: TCreateParams); override;
    procedure WMNCHitTest(var Msg: TMessage); message WM_NCHITTEST;
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation
{$R *.DFM}

procedure ExecNewProcess(ProgramName: String);
var
  StartInfo  : TStartupInfo;
  ProcInfo   : TProcessInformation;
  CreateOK   : Boolean;
begin
  FillChar(StartInfo, SizeOf(TStartupInfo),#0);
  FillChar(ProcInfo,  SizeOf(TProcessInformation),#0);
  StartInfo.cb := SizeOf(TStartupInfo);

  CreateProcess(PChar(ProgramName),nil, nil, nil,False,
         CREATE_NEW_PROCESS_GROUP+NORMAL_PRIORITY_CLASS, nil,
         nil, StartInfo, ProcInfo);
end;

procedure TForm1.CreateParams(var Params: TCreateParams);
begin
  // ÀϹÝÀûÀÎ ÆûÀÇ Æ¯¼ºÀ» ´Ù¸£°Ô ÁöÁ¤
  inherited CreateParams(Params);
  Params.style := WS_Popup or
                  WS_ClipChildren or
                  WS_ClipSiblings or
                  WS_Border;
end;

procedure TForm1.WMNCHitTest(var Msg: TMessage);
begin
  // À©µµ¿ìÁî¿¡¼­ WM_NCHITTEST ¸Þ½ÃÁö¸¦ Àü´Þ¹Þ¾Æ¼­ ÆûÀÇ Çü½ÄÀ» ´Ù¸£°Ô ÁöÁ¤
  // ¿ÞÂÊ ¸¶¿ì½º ¹öưÀ¸·Î FormÀ» dragÇÏ¿© À̵¿ÇÒ ¼ö ÀÖ°Ô µË´Ï´Ù
  if GetAsyncKeyState(VK_LBUTTON) < 0 then
    Msg.Result := HTCAPTION
  else
    Msg.Result := HTCLIENT;

  // Âü°íÇÏ½Ã¶ó±¸ ÇöÀç formÀÇ ÁÂÇ¥¸¦ Ç¥½ÃÇØºÃÀ½
  Label1.Caption := IntToStr(Self.Left);
  Label2.Caption := IntToStr(Self.Top);

  // Self.Width¿Í Self.Height¸¦ º¯°æÇϸé
  // formÀÇ ÇüŸ¦ ¹Ù²Ü ¼ö ÀÖ½À´Ï´Ù
  // ?
  // ?
end;

procedure TForm1.BB_CloseClick(Sender: TObject);
begin
  Close;
end;

procedure TForm1.BB_CalcClick(Sender: TObject);
begin
  // ÀÌ ¹öưÀ» ´©·ç¸é calc.exe°¡ ½ÇÇàµË´Ï´Ù
  ExecNewProcess('c:windowscalc.exe');
end;

procedure TForm1.BB_notepadClick(Sender: TObject);
begin
  // ÀÌ ¹öưÀ» ´©·ç¸é notepad.exe°¡ ½ÇÇàµË´Ï´Ù
  ExecNewProcess('c:windowsnotepad.exe');
end;

end.





571   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] ·¹Áö½ºÆ®¸®¸¦ »ç¿ëÇÏ´Â »ç¿ëÀÚ ÇÔ¼ö ¸¸µé¾î º¸±â  ±¸Ã¢¹Î 2003/03/14 4607 1034
570   [À©µµ¿ìÁî API] ·¹Áö½ºÆ®¸®°¡ º¯°æµÈ »ç½ÇÀ» ¾Ë¸®·Á¸é...  ±è¿µ´ë 2003/03/06 4297 1155
569   [À©µµ¿ìÁî API] ·¹Áö½ºÆ®¸®(registry)¸¦ ¹Ù²ÛÈÄ...  ±è¿µ´ë 2003/03/05 4429 1192
568   [À©µµ¿ìÁî API] ·¹Áö½ºÆ®¸® Àüü °Ë»öÇÏ±â  ±è¿µ´ë 2003/03/07 3943 1084
567   [À©µµ¿ìÁî API] ¶°ÀÖ´Â ¸ðµç Microsoft Internet Explorer Á×ÀÌ±â  ±è¿µ´ë 2003/03/29 4473 1264
566   [COM/OLE] ¶°ÀÖ´Â ¸ðµç Microsoft Internet Explorer ÀÇ html ºÒ·¯¿À±â  ±è¿µ´ë 2003/03/30 5555 1361
565   [COM/OLE] ¶°ÀÖ´Â ¸ðµç Internet Explorer ¸¦ °­Á¦ Refresh ½ÃŰ±â  ±è¿µ´ë 2004/09/20 4832 1236
564   [À©µµ¿ìÁî API] ¶°´Ù´Ï´Â À©µµ¿ì  ±è¿µ´ë 2003/03/05 4355 1139
563   [½Ã½ºÅÛ] ¶° ÀÖ´Â ÇÁ·Î±×·¥ Á×À̱â...  ±è¿µ´ë 2003/03/04 5641 1381
562   [½Ã½ºÅÛ] µð½ºÇ÷¹ÀÌ ¾î´ðÅÍ ¸ñ·Ï ±¸ÇÏ±â  ±è¿µ´ë 2004/08/11 4437 1176
561   [½Ã½ºÅÛ] µð½ºÅ©ÀÇ ³²Àº ¿ë·® µîµî...  ±è¿µ´ë 2003/03/05 4990 1353
560   [À©µµ¿ìÁî API] µð½ºÅ© ij½¬ÀÇ ÆÄÀÏÀ» µð½ºÅ©·Î ¾²±â  ±è¿µ´ë 2003/03/05 4028 1080
559   [½Ã½ºÅÛ] µð½ºÅ© µå¶óÀ̺êÀÇ ÇöÀç»óÅ ¾ò±â  ±è¿µ´ë 2003/03/05 3452 967
558   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] µð·ºÅ丮¸í ¹Ù²Ù±â/À̵¿ ÇÏ±â  ±è¿µ´ë 2003/03/07 5006 1515
557   [À©µµ¿ìÁî API] µð·ºÅ丮³ª ÆÄÀÏÀÇ ¼Ó¼º(º¯°æ/»ý¼º/»ç¿ëÇÑ ³¯Â¥, Ư¼º) ¹Ù²Ù±â  ±è¿µ´ë 2004/12/08 9952 1371
556   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] µð·ºÅ丮 »èÁ¦·çƾ(ÇϺεð·ºÅ丮 ¸ù¶¥)  ±è¿µ´ë 2003/03/06 3480 955
555   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] µð·ºÅ丮 º¹»ç·çƾ (ÇϺεð·ºÅ丮 ±îÁö ¸ù¶¥)  ±è¿µ´ë 2003/03/06 4531 1052
554   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] µð·ºÅ丮 º¯µ¿»çÇ×À» Ž»ö±â¿¡ ¾Ë¸®±â  ±è¿µ´ë 2003/03/07 5053 1541
553   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] µð·ºÅ丮 °Ë»öÇÏ¿© ÆÄÀÏ Ã£±â  ±è¿µ´ë 2003/03/05 4928 1434
552   [½Ã½ºÅÛ] µå¶óÀÌºê Æ÷¸Ë(Format) API ÇÔ¼ö  ±è¿µ´ë 2003/03/04 4715 1278
551   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] µÕ±Ù dz¼±µµ¿ò¸»À» ³ªÅ¸³»ÁÖ´Â ÄÞÆ÷³ÍÆ®  ±è¿µ´ë 2003/03/05 3020 734
550   [½Ã½ºÅÛ] µÎ°³ÀÇ ÆÄÀÏÀÌ ¿ÏÀüÈ÷ µ¿ÀÏÇÑÁö °Ë»çÇϱâ2  ±è¿µ´ë 2003/03/07 3220 926
549   [½Ã½ºÅÛ] µÎ°³ÀÇ ÆÄÀÏÀÌ ¿ÏÀüÈ÷ µ¿ÀÏÇÑÁö °Ë»çÇϱâ(CRC32)  ±è¿µ´ë 2003/03/05 4439 1047
548   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] µÎ°³ÀÇ StringGrid sync ¸¶Ãß±â  ±è¿µ´ë 2003/03/07 3537 969
547   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] µÎ°³ÀÇ RichEdit »çÀÌ¿¡ ³»¿ë º¹»çÇÏ±â  ±è¿µ´ë 2003/03/06 5390 1267
546   [¾Ë°í¸®Áò] µÎ ¹®ÀÚ¿­ÀÇ À¯»çµµ °Ë»çÇÏ±â  ±è¿µ´ë 2004/09/04 4983 1121
545   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] µÎ StringGrid ÀÇ scroll À» µ¿±âÈ­ ½ÃŰ±â  ±è¿µ´ë 2003/03/07 4287 1035
544   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] µ¿ÀûÀ¸·Î ÇÁ·ÎÁ§Æ®ÀÇ Main form ¹Ù²Ù±â  ±è¿µ´ë 2003/04/11 4675 1142
543   [µ¥ÀÌÅͺ£À̽º] µ¿ÀûÀ¸·Î À妽º ¸¸µé±â  ±è¿µ´ë 2003/03/06 4189 1072
542   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] µ¿ÀûÀ¸·Î »ý¼ºÇÑ TLabel ¸¶¿ì½º·Î À̵¿½ÃŰ±â  ±è¿µ´ë 2004/08/04 6284 1853
541   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] µ¿ÀûÀ¸·Î ¸Þ´º(memu)¿¡ Item Ãß°¡ÇÏ±â  ±è¿µ´ë 2003/03/06 4700 1256
540   [µ¥ÀÌÅͺ£À̽º] µ¿ÀûÀ¸·Î SELECTÀÇ GROUP BY ¹® ¸¸µé±â  ±è¿µ´ë 2003/03/07 3958 889
539   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] µ¿ÀûÀ¸·Î classÀÇ instance ¸¸µé±â  ±è¿µ´ë 2003/03/06 3744 1048
538   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] µµ³Ó(Doughnut) ¸ð¾çÀÇ Æû ¸¸µé±â  ±è¿µ´ë 2004/08/09 4341 1083
  [À©µµ¿ìÁî API] µµ±¸¸ðÀ½ Bar´Â ¾î¶»°Ô ¸¸µå´ÂÁö...  ±è¿µ´ë 2003/03/04 4691 1325
536   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] µ¨ÆÄÀÌÀÇ Object Inspector ¸ð¹æ  ±è¿µ´ë 2003/03/06 3136 767
535   [À©µµ¿ìÁî API] µ¨ÆÄÀÌ¿¡¼­ ½Ã°£À» ±â´Ù¸®´Â ÇÔ¼ö  ±è¿µ´ë 2003/03/04 5859 1349
534   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] µ¨ÆÄÀ̾ȿ¡ ÀͽºÇ÷η¯ »ðÀÔ  ½ÅÈÆÀç 2003/03/10 5800 1024
533   [½Ã½ºÅÛ] µ¨ÆÄÀÌ·Î DOS ÇÁ·Î±×·¥(Console application) ¸¸µé±â  ±è¿µ´ë 2003/03/06 8811 2841
532   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] µ¨ÆÄÀÌ ÅëÇÕ°³¹ßȯ°æ(IDE) ¿¡ °üÇÑ ¸î°¡Áö Tip  ±è¿µ´ë 2003/03/04 5368 1431

[ÀÌÀü 10°³] [1].. 11 [12][13][14][15][16][17][18][19][20]..[25] [´ÙÀ½ 10°³]
 

Copyright 1999-2019 Zeroboard / skin by zero