Q&A
HOME
Tips & Tech
Q&A
Discuss
Download
자유게시판
홍보 / 광고
구인 / 구직
LOGIN
회원가입
실행시에 특정컨트롤의 크기조정???
실행시에 판넬같은 특정 컨트롤의 크기를 마우스로
크기를 늘렸다 줄였다하는 걸 하려고 하는데여
잘모르겠습니다.
아시는분은 답변해주시면 감사하겠네요 ^^
수고하세여!
2
COMMENTS
강인규
•
2003.03.07 00:56
좀더 그럴듯 하게 만들려면 연구가 좀 필요하겠죠? ^^
var
bResize : Boolean;
procedure TForm1.Panel1MouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
Panel1.Top);
Panel1.SetBounds(Panel1.Left, Panel1.Top, x, y);
Screen.Cursor := crDefault;
bResize := False;
end;
procedure TForm1.Panel1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
bResize := True;
Screen.Cursor := crSize;
end;
procedure TForm1.Panel1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
if bResize then
Panel1.SetBounds(Panel1.Left, Panel1.Top, x, y);
end;
0
0
삭제
수정
댓글
백진욱
•
2003.03.07 01:42
답변감사합니다. ^^
0
0
삭제
수정
댓글
(NOTICE) You must be
logged in
to comment on this post.
맑은물
•
2003.03.07 01:59
2
COMMENTS
/
0
LIKES
델파이로 WINAPI..
최용일
•
2003.03.07 05:34
안녕하세요. 최용일입니다. nX,nY가 WM_CREATE시에 초기화되고, WM_PAINT메세지 들어올때 사용되어지는...
맑은물
•
2003.03.07 20:44
정용광
2003.03.07 01:53
0
COMMENTS
/
0
LIKES
richedit에서 특정 글자에 이벤트 주기
송승호
•
2003.03.07 01:53
4
COMMENTS
/
0
LIKES
쓰레드로 쿼리 실행시 에러 질문입니다
꿈의대화
•
2003.03.07 03:40
.
송승호
•
2003.03.07 20:51
TDataBase Component를 사용합니다... 그런데 쓰레드를 돌릴때는 세션을 쓰고 그 외 나머지는 그냥 일반...
꿈의대화
•
2003.03.07 21:49
.
송승호
•
2003.03.07 23:11
정현우
•
2003.03.07 00:28
2
COMMENTS
/
0
LIKES
TOpenDialog 에서 파일을 불러올떄 중복선택하는 법 좀 알려주세요
강인규
•
2003.03.07 00:44
if OpenDialog1.Execute then ListBox1.Items.Text := OpenDialog1....
정현우
•
2003.03.07 01:19
백진욱
•
2003.03.06 23:48
2
COMMENTS
/
0
LIKES
실행시에 특정컨트롤의 크기조정???
실행시에 판넬같은 특정 컨트롤의 크기를 마우스로 크기를 늘렸다 줄였다하는 걸 하려고 하는데여 잘모르겠습니다. 아시는분은 답변해주시면 감사하겠네요 ^^ 수고하세여!
강인규
•
2003.03.07 00:56
좀더 그럴듯 하게 만들려면 연구가 좀 필요하겠죠? ^^ var bResize : Boolean; procedu...
백진욱
•
2003.03.07 01:42
답변감사합니다. ^^
피터팬
2003.03.06 23:03
0
COMMENTS
/
0
LIKES
자신이 포함한 네트웍 구룹 이름을 알수 없나요??
심상덕
2003.03.06 21:31
0
COMMENTS
/
0
LIKES
string Grid에서 최대값 정하는법..(MaxLength) 선수들 부탁함....
홍길동
•
2003.03.06 21:17
1
COMMENTS
/
0
LIKES
윽..메모장에 글자가 깨져나옵니당. --
최용일
•
2003.03.06 23:37
안녕하세요. 최용일입니다. 표시하려는 값이 #1,#0,#0,#0 이런거 라면 메모장에 쓰면 이상하게 보이는게...
무식
•
2003.03.06 20:33
2
COMMENTS
/
0
LIKES
특수문자질문이요..
KDDG_RNStone
•
2003.03.06 20:46
일반 윈도우 상태에서 쓰는 방법과 동일하게 사용하시면 됩니다. 개발 단계이건, 실행 단계이건 간에 말...
무식
•
2003.03.07 03:57
내용 없슈
조경모
•
2003.03.06 20:33
1
COMMENTS
/
0
LIKES
웹에서 다운받은 엑셀파일을 DB에 저장시키려면...
이추형
•
2003.03.06 22:55
excel 처리관련 참조하세요 unit main; interface uses Windows, Messages, SysUtils,...
채경수
•
2003.03.06 20:27
1
COMMENTS
/
0
LIKES
InterBase 질문입니다...
박성훈
•
2003.03.07 03:46
안녕하세요? Year, Month, Day함수가 지원된다고 하시길래 이상해서 Sql날려보니까 역시나 지원안되는 ...
goodlsw
•
2003.03.06 20:19
2
COMMENTS
/
0
LIKES
데이타 베이스 네트워크 연결 좀 더 빠르게 할려면
이추형
•
2003.03.06 22:59
제가 보기에는 우선 DB설계가 잘못 된건 아닌지 의문을 드립니다. 속도가 느리다는 것은 네트웍보다 서...
goodlsw
•
2003.03.08 03:31
실제로 두 로컬 네트워크간의 전송 속도가 굉장히 느리구요. 다른 선로엔 문제가 없습니다. 원래 그쪽이...
황영신
•
2003.03.06 19:59
2
COMMENTS
/
0
LIKES
원격지 MS SQL 2000을 Client에 연결하는 방법..
박수형
•
2003.03.10 11:15
제가 알고 있기로는 MS SQL2000Server는 odbc에서 서버를 셋팅하고 Alias에서 설정을 해야 하는 것...
오프라인
•
2003.03.06 20:15
먼저 Alias를 잡아주세요... Alias를 MSSQL 로 Setting을 하여 Connect가 되나 먼저 시도해보세요... ...
초보자
•
2003.03.06 19:49
1
COMMENTS
/
0
LIKES
델파이 6.0으로 파일주고 받기 만들고 인스톨실더6.2로 샛업만들려고 하는데.. 어떤파일들이 필요하나요
최용일
•
2003.03.06 23:39
안녕하세요. 최용일입니다. 질문만으로는... 그냥 실행파일하나만 있으면 될거 같네요... 더필요한거는 ...
오프라인
2003.03.06 19:33
0
COMMENTS
/
0
LIKES
PopGrid 라는 콤포넌트 가지고 계신분 도와주세요... ㅡ..ㅡ;;
박희경
2003.03.06 08:30
0
COMMENTS
/
0
LIKES
스트링그리드에서 특정셀의 내용에따라 그리드에 각기다른 비트맵 나타내기
이승욱
2003.03.06 08:27
0
COMMENTS
/
0
LIKES
델파이 5.0 이 window2000서버에서 설치가 안됩니다
김진효
•
2003.03.06 06:07
1
COMMENTS
/
0
LIKES
ToolBar97 컴포넌트 등록 방법좀...
최용일
•
2003.03.06 23:35
안녕하세요. 최용일입니다. 잘만 설치되는데요... 안에 있는 패키지파일 불러다가 그대로 설치하면 되는...
홍길동
2003.03.06 05:24
0
COMMENTS
/
0
LIKES
파일의 내용을 읽어올때...
이성근
2003.03.06 03:59
0
COMMENTS
/
0
LIKES
디비그리드에서 picklist사용방법좀 알려 주세요
백진욱
2003/03/06 23:48
Views
260
Likes
0
Comments
2
Reports
0
Tag List
수정
삭제
목록으로
한델 로그인 하기
로그인 상태 유지
아직 회원이 아니세요? 가입하세요!
암호를 잊어버리셨나요?
var
bResize : Boolean;
procedure TForm1.Panel1MouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
Panel1.Top);
Panel1.SetBounds(Panel1.Left, Panel1.Top, x, y);
Screen.Cursor := crDefault;
bResize := False;
end;
procedure TForm1.Panel1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
bResize := True;
Screen.Cursor := crSize;
end;
procedure TForm1.Panel1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
if bResize then
Panel1.SetBounds(Panel1.Left, Panel1.Top, x, y);
end;