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

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


Category

  ±è¿µ´ë(2006-02-28 11:33:49, Hit : 4866, Vote : 1267
 http://www.howto.pe.kr
 ¸¶¿ì½º·Î ProgressBarÀÇ Position ¹Ù²Ù±â

// Shift ۸¦ ´©·é »óÅ¿¡¼­ ¸¶¿ì½º¸¦ À̵¿Çϸé PositionÀÌ ¹Ù²ò´Ï´Ù

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ComCtrls;

type
  TForm1 = class(TForm)
    ProgressBar1: TProgressBar;
    procedure ProgressBar1MouseMove(Sender: TObject; Shift: TShiftState; X,
      Y: Integer);
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  ProgressBar1.Orientation := pbHorizontal;
  ProgressBar1.Max := 100;
end;

procedure TForm1.ProgressBar1MouseMove(Sender: TObject; Shift: TShiftState;
  X, Y: Integer);
var
  newPosition : integer;
begin
  if ssShift in Shift then
  begin
    ProgressBar1.Cursor := crHSplit;
    newPosition := Round(x * ProgressBar1.Max / ProgressBar1.ClientWidth) ;
    ProgressBar1.Position := newPosition;
  end
  else
  begin
    ProgressBar1.Cursor := crDefault;
  end;
end;

end.





971   [À©µµ¿ìÁî API] ÀÛ¾÷ Ç¥½ÃÁÙ¿¡ º¸ÀÌ´Â ÇÁ·Î±×·¥ÀÇ ¾ÆÀÌÄÜ Á¤º¸  ±è¿µ´ë 2008/12/09 6034 1460
970   [À©µµ¿ìÁî API] ½ÇÇà ÆÄÀÏÀÇ ¾ÆÀÌÄÜ ¹Ù²Ù±â  ±è¿µ´ë 2008/11/27 7551 1404
969   [³×Æ®¿÷/ÀÎÅͳÝ] TClientSocket ¿¡ Local IP ¹ÙÀεùÇÏ±â  ±è¿µ´ë 2008/11/25 6332 1525
968   [¾Ë°í¸®Áò] Boyer-Moore-Horspool Text Searching  ±è¿µ´ë 2008/11/24 5066 1369
967   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] Tab, Shift+Tab Ű À̺¥Æ® »ç¿ëÇÏ±â  ±è¿µ´ë 2008/11/21 4977 1406
966   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] TStringList vs. THashedStringList  ±è¿µ´ë 2008/11/04 5262 1394
965   [½Ã½ºÅÛ] ÇÁ·Î¼¼½º°¡ ¿øµµ¿ìÁî ¿ø°Ý Å͹̳ο¡¼­ ½ÇÇàÁßÀÎÁö °Ë»ç  ±è¿µ´ë 2008/11/04 5238 1497
964   [½Ã½ºÅÛ] ¿øµµ¿ìÁî µµ¸ÞÀÎ À̸§ ±¸ÇÏ±â  ±è¿µ´ë 2008/11/04 6046 1369
963   [½Ã½ºÅÛ] »ç¿ëÁßÀÎ USB Æ÷Æ®ÀÇ ÀåÄ¡Á¤º¸ ±¸ÇÏ±â  ±è¿µ´ë 2008/11/04 12249 1482
962   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] TreeviewÀÇ ¼öÆò ½ºÅ©·Ñ¹Ù °¨Ãß°í ½ºÅ©·Ñ ¸·±â  ±è¿µ´ë 2006/03/22 5489 1256
961   [À©µµ¿ìÁî API] ¹ÙÅÁÈ­¸éÀÇ ¸ðµç â ÃÖ¼ÒÈ­ÇÏ±â  ±è¿µ´ë 2006/02/28 5434 1309
960   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] ÀÏÁ¤½Ã°£ °æ°úÈÄ ¾ø¾îÁö´Â MessageBox  ±è¿µ´ë 2006/02/28 6475 1618
959   [½Ã½ºÅÛ] SystemÀÇ Idle »óŸ¦ ¾Ë¾Æ³»´Â API  ±è¿µ´ë 2006/02/28 6113 1460
958   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] ListBox¿¡ Edit ¿Ã·Á Ç׸ñ ÆíÁýÇÏ±â  ±è¿µ´ë 2006/02/28 4822 1224
957   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] Æû Èçµé±â  ±è¿µ´ë 2006/02/28 5285 1212
  [ÀϹÝ/ÄÄÆ÷³ÍÆ®] ¸¶¿ì½º·Î ProgressBarÀÇ Position ¹Ù²Ù±â  ±è¿µ´ë 2006/02/28 4866 1267
955   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] ListBox µå·¡±×ÇÏ¿© ¾ÆÀÌÅÛ À̵¿ÇÏ±â  ±è¿µ´ë 2006/02/28 4905 1198
954   [½Ã½ºÅÛ] ÆûÀÇ Move/Resize ½ÃÀÛ,Á¾·á À̺¥Æ® °¨ÁöÇÏ±â  ±è¿µ´ë 2006/02/28 5207 1373
953   [COM/OLE] IEÀÇ ¼Ó¼ºÀ» º¯°æÇÏ¿© ¶Ù¿ì±â  ±è¿µ´ë 2006/02/28 5295 1246
952   [À©µµ¿ìÁî API] ¼¼·Î ±Û²Ã Á¦°ÅÇÑ FontDialog  ±è¿µ´ë 2006/02/28 5190 1364
951   [½Ã½ºÅÛ] CPU À̸§ ±¸Çϱâ2  ±è¿µ´ë 2005/09/13 5665 1362
950   [³×Æ®¿÷/ÀÎÅͳÝ] IP Helper API ¸¦ ÀÌ¿ëÇÑ ³×Æ®¿öÅ© Ä«µå Enable/Disable ½ÃŰ±â  ±è¿µ´ë 2005/09/10 6088 1333
949   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] Æû¿¡ ÀÚ¼®È¿°ú ÁÖ±â (Delphi 6 ÀÌÇÏ)  ±è¿µ´ë 2005/08/04 6045 1312
948   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] °´Ã¼ÀÇ valid°Ë»ç Assigned() ´ëü  ±è¿µ´ë 2005/07/29 4767 1263
947   [½Ã½ºÅÛ] ½Ã½ºÅÛ ´ë±â¸ðµå/È­¸é º¸È£±â/¸ð´ÏÅÍ ²ô±â À̺¥Æ® °¨ÁöÇÏ±â  ±è¿µ´ë 2005/07/21 6876 1511
946   [½Ã½ºÅÛ] À©µµ¿ìÁî GUI ±âº» ÆùÆ®Á¤º¸ ±¸ÇÏ±â  ±è¿µ´ë 2005/07/14 5498 1368
945   [½Ã½ºÅÛ] À©µµ¿ìÁî ÀԷµµ±¸¸ðÀ½ÀÇ ÇÑ/¿µ Åä±ÛÇÏ±â  ±è¿µ´ë 2005/06/24 5288 1392
944   [COM/OLE] ActiveFormÀÇ OnDestroy ´ë¿ë  ±è¿µ´ë 2005/04/21 5291 1245
943   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] ListViewÀÇ Å¸ÀÌÆ² ÆùÆ® ¹Ù²Ù±â  ±è¿µ´ë 2005/03/31 5208 1252
942   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] ÀÏÁ¤½Ã°£ °æ°úÈÄ ¾ø¾îÁö´Â MessageDlg/ShowMessage  ±è¿µ´ë 2005/03/26 5891 1287
941   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] ÇÁ·Î±×·¥ÀÇ bitmapÀ» MS ±×¸²ÆÇÀ¸·Î ÆíÁýÇÏ¿© ´Ù½Ã ºÒ·¯¿À±â  ±è¿µ´ë 2005/03/22 5213 1343
940   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] RichEdit 2.0 ÁÙ°£°Ý Á¶Á¤  ±è¿µ´ë 2005/02/11 7298 1290
939   [COM/OLE] Ž»ö±â¿¡¼­ ÆÄÀÏÀ» ¼±ÅÃÇÏ¿© ActiveX(ActiveFortm)¿¡ Drag&Drop ÇÏ±â  ±è¿µ´ë 2005/01/06 7595 1290
938   [À©µµ¿ìÁî API] TDownloadURL¸¦ »ç¿ëÇÑ ÆÄÀÏ ´Ù¿î¹Þ±â  ±è¿µ´ë 2004/12/26 6450 1280
937   [COM/OLE] TWebBrowser¿¡ Á÷Á¢ HTML ¼Ò½ºÄÚµå ³Ö±â  ±è¿µ´ë 2004/12/26 6092 1285
936   [À©µµ¿ìÁî API] À©µµ¿ìÁî ½Ã½ºÅÛ Àüü¿¡¼­ »ç¿ëÀÚÀÇ ¸¶¿ì½º¿Í Űº¸µå ÀÔ·ÂÀÌ ÀÖ´ÂÁö °Ë»çÇÏ±â  ±è¿µ´ë 2004/12/26 6102 1368
935   [ÀϹÝ/ÄÄÆ÷³ÍÆ®] ´ÙÀ̾ó·Î±× ¹Ú½º°¡ ÀÌ¹Ì ¶°ÀÖ´ÂÁö °Ë»çÇÏ¿© °­Á¦·Î ´Ý±â  ±è¿µ´ë 2004/12/22 5087 1229
934   [À©µµ¿ìÁî API] URLDownloadToFile()¸¦ »ç¿ëÇÑ ÆÄÀÏ ´Ù¿î¹Þ±â  ±è¿µ´ë 2004/12/15 7695 1407
933   [COM/OLE] ³» ÇÁ·Î±×·¥¿¡¼­ ¼±ÅÃÇÑ text¸¦ ´Ù¸¥ ÇÁ·Î±×·¥¿¡ Drag&DropÀ¸·Î ÁÖ±â  ±è¿µ´ë 2004/12/10 5420 1116
932   [COM/OLE] ´Ù¸¥ ÇÁ·Î±×·¥¿¡¼­ ¼±ÅÃÇÑ text¸¦ ³» ÇÁ·Î±×·¥¿¡¼­ Drag&DropÀ¸·Î ¹Þ±â  ±è¿µ´ë 2004/12/09 5548 1222

1 [2][3][4][5][6][7][8][9][10]..[25] [´ÙÀ½ 10°³]
 

Copyright 1999-2018 Zeroboard / skin by zero