Q&A

  • 드래그앤 드롭에 관한질문
그룹박스에 있는 내용을 다른 그룹박스로 옮길려고 하는데 어떻게 해야 하나요..

참고로 그룹박스가 17개 입니다.

한 개의 그룹 박스에는 판넬4개가 있음...

즉 4개의 판넬(모두 태그로 지정되어 있음)에

있는 내용을 다른 그룹의 판넬로 옮기고 싶거든요..

많은 도움 부탁드립니다.

case문을 두개 쓰는수 밖에 없나요..

그러면 소스가 너무 복잡해져 쓰기가 싫거든요..

예를들면

case (Source as TPanel).tag of

1:

case (Sender as TPanel).Tag of

1:

2:

2:

case (Sender as TPanel).Tag of

1:

2:

이런식으로 나가면 비효율적인것 같아서요..

3  COMMENTS
  • Profile
    최용일 2000.03.16 01:16
    이런식으로 해보시면 어떠실른지.. 17개의 그룹박스 형태가 모두 같다는 가정하에...



    procedure Form1.CopyGroupBox(Source, Dest: TPanel);

    var

    I: Integer;

    begin

    // 판넬에 어떤 컨트롤들이 있는줄 몰라서..

    for I := 0 to Source.ControlCount - 1

    begin

    Dest.Controls[I].Caption := Source.Controls[I].Caption;

    ...

    ...

    ...

    end;

    end;



    김준연 wrote:

    > 그룹박스에 있는 내용을 다른 그룹박스로 옮길려고 하는데 어떻게 해야 하나요..

    > 참고로 그룹박스가 17개 입니다.

    > 한 개의 그룹 박스에는 판넬4개가 있음...

    > 즉 4개의 판넬(모두 태그로 지정되어 있음)에

    > 있는 내용을 다른 그룹의 판넬로 옮기고 싶거든요..

    > 많은 도움 부탁드립니다.

    > case문을 두개 쓰는수 밖에 없나요..

    > 그러면 소스가 너무 복잡해져 쓰기가 싫거든요..

    > 예를들면

    > case (Source as TPanel).tag of

    > 1:

    > case (Sender as TPanel).Tag of

    > 1:

    > 2:

    > 2:

    > case (Sender as TPanel).Tag of

    > 1:

    > 2:

    > 이런식으로 나가면 비효율적인것 같아서요..

  • Profile
    김준연 2000.03.16 03:05
    최용일 wrote:

    > 이런식으로 해보시면 어떠실른지.. 17개의 그룹박스 형태가 모두 같다는 가정하에...

    >

    > procedure Form1.CopyGroupBox(Source, Dest: TPanel);

    > var

    > I: Integer;

    > begin

    > // 판넬에 어떤 컨트롤들이 있는줄 몰라서..

    > for I := 0 to Source.ControlCount - 1

    > begin

    > Dest.Controls[I].Caption := Source.Controls[I].Caption;

    > ...

    > ...

    > ...

    > end;

    > end;

    >



    님 procedure TForm1.CopyGroupBox(Source, Dest: TPanel);

    여기서 TPanel 를 TGroupBox로 해야 되는거 아닌가요..

    알고 싶습니다.

    그리고 답변 정말 감사합니다..



  • Profile
    최용일 2000.03.16 04:04
    제가 판넬로 착각했네요... 판넬을 그룹박스로 바꾸세요...





    김준연 wrote:

    > 최용일 wrote:

    > > 이런식으로 해보시면 어떠실른지.. 17개의 그룹박스 형태가 모두 같다는 가정하에...

    > >

    > > procedure Form1.CopyGroupBox(Source, Dest: TPanel);

    > > var

    > > I: Integer;

    > > begin

    > > // 판넬에 어떤 컨트롤들이 있는줄 몰라서..

    > > for I := 0 to Source.ControlCount - 1

    > > begin

    > > Dest.Controls[I].Caption := Source.Controls[I].Caption;

    > > ...

    > > ...

    > > ...

    > > end;

    > > end;

    > >

    >

    > 님 procedure TForm1.CopyGroupBox(Source, Dest: TPanel);

    > 여기서 TPanel 를 TGroupBox로 해야 되는거 아닌가요..

    > 알고 싶습니다.

    > 그리고 답변 정말 감사합니다..

    >

    • 윤정선
    • 2000.03.15 21:05
    • 2 COMMENTS
    • /
    • 0 LIKES
    • 강인규
      2000.03.15 22:31
      formstyle을 stayontop으로 하거나 bringtofront나 sendtoback명령을 이용하는 방법도 있습니다. 하지만 ...
    • 최용일
      2000.03.15 21:24
      폼의 BringToFront, SendToBack메소드를 이용해보세요... 윤정선 wrote: > 또 이렇게 도움을 청하려고 ...
    • 조씨
    • 2000.03.15 21:03
    • 0 COMMENTS
    • /
    • 0 LIKES
    • 김기철
    • 2000.03.15 20:43
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 류종택
      2000.03.16 00:02
      컴파일러가 필요하시단 말씀인지요.. 볼랜드에서 Turbo Pascal 5.5를 공개했는데 참고해보세요.. 첨부물 ...
    • 류종택
      2000.03.15 23:45
      일단 폼이 Show 가아닌 ShowModal 을 사용할 때 또는 메인 폼일 때는.. OnActivate 이벤트를 사용하시면 ...
    • 하얀까마귀
      2000.03.16 00:23
      안녕하세요 하얀까마귀 입니다. 그정도를 하셧으면 다 하셧네요... ShowWindow(WinHandle, SW_MAXIMI...
    • 강인규
      2000.03.15 22:56
      그냥 sql을 써서 데이터를 읽는걸 말하시는 거라면 델파이 메인메뉴에 database-explore가 있습니다. 여...
    • bagi7
    • 2000.03.15 21:19
    • 0 COMMENTS
    • /
    • 0 LIKES
    • 박상길
    • 2000.03.15 19:54
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 최용일
      2000.03.15 21:13
      TRegistry를 이용하여 HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer 아래...
    • 화랑
      2000.03.15 20:50
      안녕하세요.. 화랑입니다.. 음. 데모에 있는 예제는 ISAPI와 CGI의 예제입니다.. 델파이로 만들수 있...
    • sun
      2000.03.18 02:16
      윤정현 wrote: > 배포판을 설치시 > > Merging the Configuration File Has Failed > ConFigFile :C:P...
    • 김준연
    • 2000.03.15 19:00
    • 3 COMMENTS
    • /
    • 0 LIKES
    • 최용일
      2000.03.16 01:16
      이런식으로 해보시면 어떠실른지.. 17개의 그룹박스 형태가 모두 같다는 가정하에... procedure Form1.C...
    • 김준연
      2000.03.16 03:05
      최용일 wrote: > 이런식으로 해보시면 어떠실른지.. 17개의 그룹박스 형태가 모두 같다는 가정하에... > ...
    • 최용일
      2000.03.16 04:04
      제가 판넬로 착각했네요... 판넬을 그룹박스로 바꾸세요... 김준연 wrote: > 최용일 wrote: > > 이...
    • 초보
    • 2000.03.15 18:58
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 하얀까마귀
      2000.03.16 00:05
      안녕하세요 하얀까마귀 입니다. 지금 말씀하신건 훅킹밖에는 없습니다. 프로그램이 활성화 되어 있고...
    • 성낙권
    • 2000.03.15 15:41
    • 2 COMMENTS
    • /
    • 0 LIKES
    • 유레카
      2000.03.15 20:10
      성낙권 wrote: > 파라독스 디비에서 SQL문을 써서 데이타를 관리합니다. > 날짜값을 검사해서 날짜가 입...
    • 장은석
      2000.03.15 16:14
      질문 내용을 보니 필드 형식이 date 형이군요.. 단도직입적으로 말씀드리자면 date type에는 Null이 대입...
    • mad
    • 2000.03.15 10:34
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 최용일
      2000.03.15 19:53
      요즘들어 핫키에 대한 비슷한 질문이 많이 들어오는 군요... 검색을 해보세요... 예제가 있습니다. mad...
    • 백록화
    • 2000.03.15 10:04
    • 4 COMMENTS
    • /
    • 0 LIKES
    • 화랑
      2000.03.15 20:47
      안녕하세요. 화랑입니다.. test.exe/save 에게 쿼리를 넘기는 값을 test.exe/input 안에서 string 형으...
    • 백록화
      2000.03.15 23:58
      yo~ ^^*^~ 안녕하세요! ^^'' 날씨가 꽤 좋네요! (봄이당...^o^) 음..그런식으로도 해봤습니다. 그런...
    • 화랑
      2000.03.16 02:35
      조금 질문이 해깔리는 군요.. 음... 어떻게 설명을 하면 될까요.. 일단 XXX.exe/aaa?쿼리=데이터로...
    • 백록화
      2000.03.16 03:02
      yo~ ^^*^~ 화랑님...드뎌 되었슴돠~ TTmTT 흠...화랑님 말씀대로 동적으로 코딩을 해주는 방법으로 ...
    • 강인규
      2000.03.15 23:07
      1번에 대한 질문에 답변입니다. 사각형을 그냥 사각형으로 그리는것은 프린터에 따라 치명적인 결과을 ...
    • 하얀까마귀
      2000.03.15 19:50
      안녕하세요 하얀까마귀 입니다.. 저도 코스모스님의 글을 보았는데 무척 기분이 나빴던 사람중에 한사람...
    • 임형호
      2000.03.15 18:32
      코스모스 wrote: > 음... > 여러분의 글을 읽고 정말 다시 한번 생각을 하게되었습니다. > 프로그래...