Q&A

  • Form이 뜨는 속도 측정하는 방법?
안녕하십니까...

몇몇 Form에 대해 Form이 뜨는 속도 측정하고 싶습니다...
여러가지 생각을 해봤지만 뾰족한 답이 떠오르지 않아 이렇게 글을 올립니다...

폼 이벤트를 이용하지 않쿠 하는 방법을 아시는분은 답변 부탁드립니다...

2  COMMENTS
  • Profile
    바다를향해 2002.08.01 00:55
    위에 답변되어 있는 소스를 가지구여

    program Project1;

    uses
      Forms,
      Unit1 in 'Unit1.pas' {Form1};

    {$R *.RES}

    begin
      Application.Initialize;
    ////////////////////////////////요기 부터
      Application.CreateForm(TForm1, Form1);
    ////////////////////////////////요기 까지는 Create 구여
      Application.Run;
    ////////////////////////////////요기 까지 하믄 Show 까지구여..
    end.

    를 측정 하심 될껍니다....
    참고로 오토크리에이트 폼들은 위처럼 프로젝트소스에서 하시구여
    어베일러블 폼들은 크리에이트 하는 순간부터 쇼우 프로시저 호출한 다음까지
    측정 하심 되죵....
    냠냠....즐건 플밍 하세용....^^;;;;

    바다를향해


  • Profile
    이현철 2002.07.31 23:37
    아래 소스는 경과시간을 측정하는 소스 예제입니다
    폼을 Create 시키기 바로 이전에 스타트하시고
    끝난후에 시간을 보시면 됩니다
    참고하세요


    procedure TForm1.Button1Click(Sender: TObject);
    Const
        CLOCK_TICK : Double = 1000;
    Var
      i: LongInt;
      StartTime, EndTime : Double;
    Begin
    i:= 0;

    // 시작 시간을 저장
    StartTime:= GetTickCount;  

    // 아무거나 원하는 작업
    While (i < 10000000) do i:= i+1;

    // 끝난 시간에서 시작 시간을 뺀다
    EndTime:= GetTickCount - StartTime;
    ShowMessage(Format('Elapsed Time: %0.2f Seconds', [EndTime/CLOCK_TICK]));
    End;
    • 성대현
    • 2002.08.01 20:12
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 홍성락
      2002.08.01 23:21
      hsr////////////////////////////////////////////////////// 예제로 마우스HOOK입니다. 체크박스를 체크...
    • KDDG_ZZOM
      2002.08.01 19:47
      저도 잘은 모르지만... RichEdit가 쪼금더 들어가는것같던데...^^ 즐프하세요...
    • 최석기
      2002.08.01 20:01
      예저너에 어디선가 받았던거거든요.. 표준 콘트롤의 몇가지 한계   Tab   &n...
    • 나옹이
    • 2002.08.01 14:43
    • 0 COMMENTS
    • /
    • 0 LIKES
    • 양상훈
      2002.08.01 21:22
      Delphi Tips 에서 Drag으로 검색하면 타락천사님이 올린 팁이 있습니다. 참고하시기 바랍니다.
    • 이민선
      2002.08.02 01:41
      답변 감사드립니다. 타락천사님의 예제로 만들어 보고 있었는데요. 윈도우익스플로러 등에서 파일이나 ...
    • 박상기
      2002.08.02 03:53
      혹시 이런 프로그램을 구현하고자 하는게 아닌지요? 익스에서 그림이나 URL을 드래깅엔드랍해보세요.. 함...
    • 이민선
      2002.08.02 04:11
      예 맞습니다. 이 예제에서는 그림파일이나 다른 ole오브젝트에 대해서 직접 출력까지 하고 있지만 이정도...
    • 신현빈
    • 2002.08.01 06:23
    • 2 COMMENTS
    • /
    • 0 LIKES
    • Runo
      2002.08.02 02:51
      Ado ConnectionString에 "Network Address=디비서버주소,1433;Network library=DBMSSOCN" 를 추가해보세...
    • 이중철
      2002.08.01 06:35
    • 김상완
    • 2002.08.01 05:15
    • 2 COMMENTS
    • /
    • 0 LIKES
    • 최용일
      2002.08.02 12:13
      안녕하세요. 최용일입니다. 툴바두개 놓으시면 왼쪽에 세로로 막대들 보이실겁니다. 그 막대로 툴바이동...
    • 김도형
      2002.08.01 18:44
      근데 꼭 COOL바위에 TOOL바를 위치 시켜야하는 이유라도 있나염~??
    • 황원규
    • 2002.08.01 03:46
    • 2 COMMENTS
    • /
    • 0 LIKES
    • gudwhrla
      2002.08.01 04:14
      TPanel(FindComponent(ta)).Color := clyellow;
    • 황원규
      2002.08.01 05:02
      ...
    • 이창훈
    • 2002.08.01 03:10
    • 0 COMMENTS
    • /
    • 0 LIKES
    • 김형수
      2002.08.01 00:45
      edit box에서 엔터칠때 버튼 누른것과 같은 효과를 말하는 거죠? edit 의 이벤트에서 Onkeypress 에서 .....
    • 유상민
    • 2002.07.31 23:01
    • 2 COMMENTS
    • /
    • 0 LIKES
    • 바다를향해
      2002.08.01 00:55
      위에 답변되어 있는 소스를 가지구여 program Project1; uses   Forms,   Uni...
    • 이현철
      2002.07.31 23:37
      아래 소스는 경과시간을 측정하는 소스 예제입니다 폼을 Create 시키기 바로 이전에 스타트하시고 끝난후...
    • 최수림
    • 2002.07.31 22:23
    • 4 COMMENTS
    • /
    • 0 LIKES
    • 이현철
      2002.07.31 23:35
      저같은 경우에는 사용자가 입력한 파일명을 바서 끝에 .ini가 없다면, 임의로 제가 붙여서 저장합니다..&n...
    • 최수림
      2002.07.31 23:41
      파일명은 ini고정되어 있구요..!! 거기서 파일이름을 예를 들어 test 라고만 하고 확인을 누르면.... ...
    • 최용일
      2002.07.31 23:56
      안녕하세요. 최용일입니다. TSaveDialog컴포넌트 속성에 보시면 DefaultExt란게 있습니다. 거기에다가 ...
    • 최수림
      2002.08.01 00:42
      감사합니다..^_____^ 냉무라구 했는데...^__^
    • 동규재
    • 2002.07.31 21:17
    • 2 COMMENTS
    • /
    • 0 LIKES
    • 이도현
      2002.08.01 01:06
      원래 2줄 까지만 받습니다. 그래서 여러줄로 보내할 내용은 줄마다 구분자를 삽입하여 한줄로 만들어 보...
    • 이현철
      2002.07.31 23:33
      가능하다면.. 서버프로그램을 올려줄수 있으신가요? 클라이언트 ClientSocket1Read 이벤트에서 별다른 작...
    • ^ㅡ^
    • 2002.07.31 21:13
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 바다를향해
      2002.08.01 01:00
      폼의 속성이 먼지 몰겠지만여... 폼을 2회 이상 Free를 한듯 하네여..... 생성을 한번 했으면 파괴를 한...
    • 최석기
      2002.08.01 00:54
      여기 배한백님이 강좌로 올리신 글 링크 연결 합니다. http://www.delmadang.com/cwb-bin/CrazyWWWBoard...
    • 윤정식
    • 2002.07.31 20:47
    • 1 COMMENTS
    • /
    • 0 LIKES
    • ^ㅡ^
      2002.07.31 21:06
      //무슨일을 하려고 하는지는 모르겠는데요 제가 알기로는 CachedUpdates ,ApplyUpdates 는 upDatesql에서...
    • 이경열
    • 2002.07.31 20:36
    • 0 COMMENTS
    • /
    • 0 LIKES
    • 빙구
    • 2002.07.31 20:34
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 박상기
      2002.07.31 22:08
      전역 후킹은 DLL로만 만들어야 하는걸로 압니다..
    • 임청택
    • 2002.07.31 19:59
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 바다를향해
      2002.08.01 01:10
      ADOConnection1.Open; ADOConnection1.Close; 를 각각 데이터모듈유닛의 OnCreate와 OnDestroy에 추가를 ...