Q&A

  • 콘솔모드에서 출력할때...




첨부파일의 그림 1.gif처럼 정렬되게 나오게 하고 싶은데
저는 첨부파일 2.gif 처럼 삐뚤삐뚤하게 나와버리네여...
기능은 똑같이 구현했는데...
정렬이 안되는군요 ㅠㅜ

일단은 프로그램은 주사위를 두개 랜덤하게 돌려서 그값이 조건에 맞으면 승리하고 조건에 맞는 배당금을 받아서 옆에 금액에 추가되어나오고 아니면 지면서 배팅금액만큼 감소하는  프로그램으로 베팅도 랜덤으로 하는 프로그램입니다...
코딩은 다 끝났고...
프로그램자체는 이상이 없지만...이왕 낼꺼면 깔끔하게 정렬하고 싶은데...
데이타들의 크기가 랜덤이다 보니 저마다 크기가 달라서 writeln으로 똑같은 칸을 띄우게 되어있어서 보기가 싫어지네여...
1.gif 처럼 깔끔하게 정렬할려면 어떻게 해야 할까여?
생각나는 방법은 노가다로 각각의 데이타들의 크기를 측정해서 그크기에 맞게 각각다 다르게 칸을 띄워주고 출력하는 방법이 생각나긴 하지만 너무나도 무대뽀적인 발상인거 같고 이보다 더쉬운 방법이 없을까여?

1  COMMENTS
  • Profile
    오선배 2003.06.05 23:03
    function Lj(s: string; len: integer): string; { ex)Lj(4,'AB')-> 'AB  ' }
    var
      l : integer;
    begin
      l := Length(s);
      SetLength(s, len);
      fillchar(s[l + 1],len-l,#32);
      result := s;
    end;

    ex) Lj(베팅번호,10)+ Lj(베팅,10)+ ....;
    ---------끝 -----------

    • 박정순
    • 2003.06.06 00:39
    • 0 COMMENTS
    • /
    • 0 LIKES
    • 임진묵
      2003.06.06 01:39
      TCP 던지 파워소켓이 있잖아요.. 거기에 아이피하고 포트 하고 넣고 연결 누르시면... 연결이 정상적으로...
    • bluechip
      2003.06.06 02:27
      현재는 님과 같은 방법으로 사용중입니다 결과를 실시간으로 나타내야 하기 때문에 매번 연결/연결해제 ...
    • 장의성
    • 2003.06.06 00:04
    • 1 COMMENTS
    • /
    • 0 LIKES
    • ㉯㉰감자
      2003.06.06 00:21
      IdException은 Indy콤포넌트에서 사용하는 에러죠.. IdException에다 커서 두고 F1만 눌러보셨어도.. 금...
    • ㉯㉰감자
      2003.06.06 01:36
      http://www.redwiki.net/wiki/moin.cgi/Design_20Issue_20When_20Using_20IOCP_20in_20a_20Winsock_20Serve...
    • 방재웅
      2003.06.06 03:25
      안녕하세요. 저역시 자세히는 모르지만 아는데까지 설명드리겠습니다. IOCP는 서버 side에서 주로 사...
    • 이승근
    • 2003.06.05 22:47
    • 4 COMMENTS
    • /
    • 0 LIKES
    • 김경록
      2003.06.06 18:42
    • 이성찬
      2003.06.12 05:40
      간단히 레파지토리 활용하세요. 폼 상속이 쉽고 간편해집니다. 생성한 폼에 코딩중 중복된 부분을 해준...
    • 이승근
      2003.06.06 19:36
      상속을 받는다는게 무슨뜻이며 어떻게 받아야 하는거져... 초봅니다... 고수님 부탁드려여...^^
    • 김경록
      2003.06.07 05:59
      예를 들어서.. MainForm1 이라는 어떤 기능을 가진 Form을 만들었다고 가정합시다.. 이 폼의 선언부에...
    • 권광화
    • 2003.06.05 22:42
    • 1 COMMENTS
    • /
    • 1 LIKES
    • 오선배
      2003.06.05 23:03
      function Lj(s: string; len: integer): string; { ex)Lj(4,'AB')-> 'AB  ' } var  &n...
    • 이광수
      2003.07.23 22:00
      http://suppul.x-y.net/bbs/board.php3?table=delphi&query=view&l=37&p=1&go=0 입니다.
    • 이정은
    • 2003.06.05 21:25
    • 3 COMMENTS
    • /
    • 0 LIKES
    • 홍미자
      2003.06.23 23:38
      ______________ 1.변수 선언    var   Cnt : Integer; 2.레포트의 BeforePrint 이...
    • 신명곤
      2003.06.06 04:34
      sql에 between 문을 쓰면 되지않을까 생각하는 데요
    • 김명찬
      2003.06.05 21:35
      쿼리할때부터 필요한 날짜까지만 쿼리를 하거나.. subdetail 밴드를 사용하여 OnNeedData 이벤트를 사요...
    • 김명찬
    • 2003.06.05 21:02
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 방재웅
      2003.06.06 03:29
      다른 항목은 모르겠지만 요 레지스트리를 사용하시면 기본글꼴은 고정이 가능합니다. 참고로, 폼의 ...
    • KDDG_ZZOM
      2003.06.05 21:14
      우선 Open을 ExecSQL로 바꿔서 해보세요... Open은 조회할때만 사용하시고요... 즐프하세요...
    • 정문희
      2003.06.06 00:20
    • 초보
    • 2003.06.05 19:34
    • 2 COMMENTS
    • /
    • 0 LIKES
    • KDDG_ZZOM
      2003.06.05 19:48
      필드의 널값을 비교할려면 IS NULL,  IS NOT NULL이런식으로 해야되는 예약어라고 생각하시는게...
    • 이광수
      2003.06.05 19:48
      데이터 베이스에 따라 다르겠지만 오라클의 경우는 = null을 쓰시면 결과를 얻을수 없습니다. null 의 ...
    • 아폴론
    • 2003.06.05 19:23
    • 2 COMMENTS
    • /
    • 0 LIKES
    • KDDG_09
      2003.06.05 19:54
      clBtnFace 과 clSilver 는 틀린색깔이죠.... clBtnFace는 시스템 색이죠.... 바탕화면 등록정보에서 화면...
    • ㉯㉰감자
      2003.06.05 19:48
      clBtnFace같은 경우는 OS의 테스크탑에서 설정값 색상값을 가지거든요 아마 98이나 xp에서 clGray하면 ...
    • 임형호
    • 2003.06.05 19:02
    • 0 COMMENTS
    • /
    • 0 LIKES
    • 타락천사
      2003.06.09 02:57
      안녕하세여. 타락임다.. 별로 권하고 싶지 않습니다. 공유 폴더 만들면 바이러스를 걸리게 할 뿐입니...
    • goodlsw
    • 2003.06.05 09:46
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 한원희
      2003.06.07 12:50
      안녕하세요. 한원희입니다. 아마도 다음과 같이 코딩하신거 같은데...   Form1.ShowModal;...
    • yosule
      2003.06.05 08:02
      메인폼을 MDI 폼 스타일로 바꾸세요
    • 맑고투명
      2003.06.06 06:44
    • yosule
      2003.06.06 08:24
      씁쓸...
    • 마르
    • 2003.06.05 05:08
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 박상기
      2003.06.05 07:48
      Delphi Symbol Module의 약자로서 이것이 안 생기게 할려면 델파이 메뉴에서 Tools -> Environmen...
    • 김철홍
      2003.06.18 03:29
      Record를 이용해 보심이.. ex) Type       pdata = ^TData;  &n...
    • 박정일
      2003.06.11 03:59
      DLL에서 스트링을 넘길때는  PChar로 넘겨야 안전합니다. 그리고, unit 소스에 ShareMem이 첫번...
    • 방재웅
      2003.06.06 03:36
      만일 APP가 델파이라면 TStringList 를 사용해보세요. 아니면 포인터를 사용하시는 것도 괜찮구요.
    • yosule
      2003.06.05 08:44
      클래스를 이용한 개체(Object)를 리턴하는 방법으로 해보시죠!
    • 오병주
      2003.06.05 03:00
      Try ~ except 문에  EIdSocketError 사용하세요... Try Except   on EIdSocke...