Q&A
- 레이블에 관해서. 공백을 한칸씩 주고 싶습니다....
procedure TForm1.Button2Click(Sender: TObject);
var
s : String;
i : integer;
begin
s := '우리나라 만세...';
for i := 1 to length(s) do
begin
label1.caption := label1.caption +' '+ s[i];
end;
end;
위와 같이 짰는데.. 글자가 모두 깨져 버리네요. 자간을 주고 싶어서 만들고 있는데. 음..
너무 어렵네요...
영문일경우는 1바이트라 깨지지 않는데. 2바이트 글인 한글은 잘 안되네요.
해결해주실분 없나요...
var
s : String;
i : integer;
begin
s := '우리나라 만세...';
for i := 1 to length(s) do
begin
label1.caption := label1.caption +' '+ s[i];
end;
end;
위와 같이 짰는데.. 글자가 모두 깨져 버리네요. 자간을 주고 싶어서 만들고 있는데. 음..
너무 어렵네요...
영문일경우는 1바이트라 깨지지 않는데. 2바이트 글인 한글은 잘 안되네요.
해결해주실분 없나요...
2
COMMENTS
-
아래와 같이 WideString으로 바꾸면 됩니다. -
procedure TForm1.Button1Click(Sender: TObject);
var
n, i, max : integer;
s : string;
begin
s := '우리나라만세';
i := 3;
n := Length(s);
max := (n div 2)+n; // 공백을 넣어 문자열이 늘어나는 것 처리
while i < max do begin
Insert(' ',s,i); // 3,6,9,12..
i := i+3;
end;
Edit1.Text := s;
end;
이래두 되여..^^ 즐푸..~
(NOTICE) You must be logged in to comment on this post.
-
- 이창열
- 2002.03.19 04:57
- 0 COMMENTS
- /
- 0 LIKES
-
- 유창원
- •
- 2002.03.19 04:54
- 1 COMMENTS
- /
- 0 LIKES
-
유창원•2002.03.19 07:44스스로 해결을 해버렸군요. 아 갈길은 멀고도 험하구나.... 간단한 소스는 자료실에 올라가 있습니다.(78...
-
- 델.초
- 2002.03.19 04:13
- 0 COMMENTS
- /
- 0 LIKES
-
- 정성훈
- •
- 2002.03.19 03:58
- 5 COMMENTS
- /
- 0 LIKES
-
최석기•2002.03.19 04:19방법이 두가지 있네요 1. FormatFloat('#,##0',1000) 2. Format('%.0n',[1000.00]
-
정성훈•2002.03.19 04:34님의 답변 정말 감사합니다. 그런데.. ... var a : String; begin a := '10000'; Edi...
-
최석기•2002.03.19 05:16이궁... 에러가 뜨면 왜 에러가 뜨는지 함 도움말 찾아보는 습관을 들이는게 좋을 듯 싶네요.. forma...
-
정성훈•2002.03.19 06:05님 덕분으로.. 문제 해결.. 님 정말 감사해요.^^
-
미소나눔•2002.03.19 04:07procedure TForm1.Button2Click(Sender: TObject); var s : string; n, pos : ...
-
- freelab
- •
- 2002.03.19 03:39
- 1 COMMENTS
- /
- 0 LIKES
-
홍성락•2002.03.19 05:14/////////////////////////////////////////////////////// 속성중에 wordwrap을 False로하세요.
-
- 이영석
- •
- 2002.03.19 03:27
- 1 COMMENTS
- /
- 0 LIKES
-
공성환•2002.03.19 03:28sum을 하기전에... select sum(nvl(필드값,0)) .... ...
-
- BlueSea
- •
- 2002.03.19 03:25
- 4 COMMENTS
- /
- 0 LIKES
-
김경록•2002.03.20 02:24DB 서버가 어떤 종류인가여? DB서버가 있는 OS는 어떻게 되는가여?
-
공성환•2002.03.19 03:27데이타베이스가 어떤건지는 모르지만... 트리거이벤트를 사용해보세요...
-
염상철•2002.03.19 19:35with query1 do begin close; &nb...
-
BlueSea•2002.03.20 23:50답변 해주신 분들 먼저 감사합니다. 근데 트리거는 테이블에 Insert나 update가 될때 발생되는건데 ...
-
- 초보임당
- •
- 2002.03.19 02:41
- 2 COMMENTS
- /
- 0 LIKES
-
나두초보!!•2002.03.20 20:28마스타, 디테일로.. 퀵리포트에 rbDetail에.. 고객상세 rbSubDetail.... 기타테이블로 자식들의 dat...
-
김경록•2002.03.20 02:33이건 한몫에 끝내기란 다소 시간이 많이 걸리거나.. 잘 안될 소지가 보이네여.. 델파이6에서는 어떻게 지...
-
- 문상준
- •
- 2002.03.19 02:25
- 2 COMMENTS
- /
- 0 LIKES
-
칼리•2002.03.19 02:49같은 네트워크상의 컴터는 실아이피 라는 말이 애매하군요. 공인 고정 IP인지? 아니면 내부에서 사용하...
-
문상준•2002.03.19 09:56실아피라 함은 고정아이피란 말입니다.. 그리고 핑은 떨어집니다.. reply xxx.xx.xxx.xx 뭐 이런식으...
-
- 깨비
- •
- 2002.03.19 01:34
- 2 COMMENTS
- /
- 0 LIKES
procedure TForm1.Button2Click(Sender: TObject); var s : String; i : integer; begin s := '우리나라 만세...'; for i := 1 to length(s) do begin label1.caption := label1.caption +' '+ s[i]; end; end; 위와 같이 짰는데.. 글자가...-
김기수•2002.03.19 01:52아래와 같이 WideString으로 바꾸면 됩니다.
-
미소나눔•2002.03.19 04:04procedure TForm1.Button1Click(Sender: TObject); var n, i, max : integer; ...
-
- 김기수
- •
- 2002.03.19 01:29
- 1 COMMENTS
- /
- 0 LIKES
-
김경록•2002.03.20 02:38물론 될것이라 판단됩니다.. (실제로 업무에서도 그렇게 사용한 후에 배포를 했었습니다..) 파라독스도 ...
-
- 박성훈
- •
- 2002.03.19 00:57
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2002.03.19 04:43안녕하세요. 최용일입니다. 흠... .inc파일 보시면 $ifdef 문이 보이실겁니다. 이게 해답이네요... ...
-
- 이대희
- 2002.03.18 23:55
- 0 COMMENTS
- /
- 0 LIKES
-
- Delphi Kim
- •
- 2002.03.18 22:56
- 1 COMMENTS
- /
- 0 LIKES
-
Delphi Kim•2002.03.19 00:34아쒸.....울 나라를 어케 보구...쩝!!! delphi6에 있는 install shield 버그랍니다... 고쳐달라구 얘...
-
- 오범숙
- 2002.03.18 22:55
- 0 COMMENTS
- /
- 0 LIKES
-
- 김진석
- •
- 2002.03.18 21:54
- 1 COMMENTS
- /
- 0 LIKES
-
신동훈•2002.03.19 06:04저도 잘은 모르지만... 델파이 오랫동안 안쓰다고 요즘 다시 쓰기시작하는터라... 혹시 다음과 같이 코...
-
- 정진우
- •
- 2002.03.18 21:39
- 2 COMMENTS
- /
- 0 LIKES
-
홍성락•2002.03.18 22:32//////////////////////////////////////////////////////// 전에도 같은 질문이 있었는데요... FloatToS...
-
정진우•2002.03.19 02:44설명하신 방법들은 문자열로 표현해주기 위한 방법들이고요~ 계산된 값은 소숫점부분이 이상한것 같습니다...
-
- 김동일
- •
- 2002.03.18 20:53
- 1 COMMENTS
- /
- 0 LIKES
-
박상윤•2002.03.27 08:53pas 파일이있으면 컴파일을 다시 하시면 됩니다... 만약 형이 맞지 안거나 하면... 비슷한 형으로 바궈주...
-
-
초보임당•2002.03.18 20:45mdi child 불러 올때 제가 쓰는 거고여... mdi child 폼은 프로퍼티에 폼 스타일을 fsMDIChild로 바꾸어 ...
-
염상철•2002.03.18 20:51일반폼을 불러 오고 싶은건데.. form1.show; form1.showmodal; 을 하면 에러가 나는데 그냥 불러 와 지...
-
초보임당•2002.03.18 21:05일반 폼은여 ...form style 을 nomal 로 바꾸시고 역시 옵션에서 일단 &n...
-
-
