Q&A

  • stringgrid에 대해서 궁금합니다.
델파이 초보자입니다.
vb에서는 stringgrid를 사용할때 ..
Grid.Clear
With Grid
.Rows = 2
.ColAlignment(0) = 4
.ColAlignment(1) = 4
.ColAlignment(2) = 4
.ColAlignment(3) = 4

.ColWidth(0) = 770
.ColWidth(1) = 2100
.ColWidth(2) = 2000
.ColWidth(3) = 1500


.TextMatrix(0, 0) = "번호"
.TextMatrix(0, 1) = "DATA"
.TextMatrix(0, 2) = "TIME"
.TextMatrix(0, 3) = "LOTNO"

End With

이렇게 해서 그리드 머릿말 부분을 만들고, 그리드 내용은 아래와같이...

Dim rs As ADODB.Recordset
Dim str As String
Set rs = New ADODB.Recordset
con.Open constr
str = str10
rs.Open str, con, adOpenStatic, adLockOptimistic
Dim Counter As Integer
Counter = 1
If Not rs.EOF Then

Do Until rs.EOF

With Grid
.Rows = rs.RecordCount + 1
.TextMatrix(Counter, 0) = Counter
.TextMatrix(Counter, 1) = rs!date1 & ""
.TextMatrix(Counter, 2) = rs!time1 & ""
.TextMatrix(Counter, 3) = rs!lotno & ""
End With
Counter = Counter + 1
rs.MoveNext
Loop

End If
Grid.Sort = 2
end sub
이렇게 사용하잖아요...
델파이에서는 어케 사용하는지??

그리고 혹시 component를 메뉴에 추가시키는건 어떻게 하는지 알고싶습니다.
고수님들...   초보자 한번 살려주십시요...
책에는 일반 그리드만 설명이 되어있어서...
부탁드립니다..
혹시 예제라도 있음 더욱더 좋겠습니다.
저도 빨리 배워서 남들을 도울그날까지 열심히 하겟습니다.
읽어주셔서 감사합니다. ^^
1  COMMENTS
  • Profile
    최여옥 2002.08.02 22:16
    우선은 component 추가방법입니다.
    1. component 메뉴을 누르고 install Component... 를 실행한다.
    2. Browse버튼을 눌러 추가할 컴포넌트를 선택한다.
       (한꺼번에 여러개 선택해도 됨)
    3. Ok 버튼을 누르고 YES버튼을 누르면 끝~~

    다음은 stringGrid사용법임다.
    음.. 제가 VB를 잘몰라서리...
    1. 우선 폼에 stirngGrid를 올려놓고 적당히 size를 지정합니다.
    with stirngGrid do
    begin
        ColCOunt :=  3 ;              // 스트링그리드 셀의 갯수 지정.
        rowCOutn := 2 ;               // 스트링그리드의 초기 row지정.
        ColWidths[1] := 100 ;   // 이런식으로 각 셀의 폭을 지정.
        Cells[0,0] :=  '제목1' ;
        Cells[1,0] :=  '제목2' ;
        Cells[3,0] :=  '제목3' ;
        Cells[4,0] :=  '제목4' ;
    end ;

    // 위의 예제가 Table을 그대로 stringGrid로 옮기는 것이라면...
    addrow := 0 ;
    with Table1 do
       while not eof do
       begin
             stringGrid.rowCOunt := stringGrid.rowCOunt + 1 ;
             INC(addrow) ;        
             stringGrid.Cells[0,addrow] := fieldByName(Counter').asString ;
             stringGrid.Cells[1,addrow] := fieldByname('Date').asString;
             stringGrid.Cells[2,addrow] := fieldByName('Time').asString ;
             stringGrid.Cells[3,addrow] := FormatFloat('#,', fieldByName) ;
             Next ;
       end ;
    end ;

    // 이정도면 될것같은디...
        
    • 박성훈
      2002.08.04 20:13
      안녕하세요? Undeclared identifier : 'FindNearest'  메세지는 이 메소드를 쓸 수 없다는 ...
    • 정광채
    • 2002.08.02 20:43
    • 3 COMMENTS
    • /
    • 0 LIKES
    • ^ㅡ^
      2002.08.03 03:18
      안녕하세요 저도 델파이초보입니다 근데 제가 알기론 이미지를 디비에 저장 하는방법은 좋지 않...
    • 정광채
      2002.08.03 09:54
      var  bmp : String; begin if OpenPictureDialog1.Execute then  //오픈픽쳐다이...
    • ^ㅡ^
      2002.08.03 22:47
      저두 여기서 도움을 많이 받았거든요 아까 그 내용들도 여기 저기서 찾은거에요 그래도 도움이 되셨다...
    • 한승희
    • 2002.08.02 19:39
    • 2 COMMENTS
    • /
    • 0 LIKES
    • 이준해
      2002.08.03 01:55
      CBuilder 6.0 을 같이 설치하셨나요 ?
    • 솔잎혹파리
      2002.08.03 01:37
      이렇게 함 해보세요 Bin폴더에 Delphi32.dsk가 있습니다 이놈을 지우고 해보셔요
    • 미러
    • 2002.08.02 18:38
    • 4 COMMENTS
    • /
    • 0 LIKES
    • 이준해
      2002.08.03 01:56
      pagefooter 와 묶이는 GroupBand 를 사용하셨나요 ? 사용하셨으면. 그 GroupBand 의 ForceNewPage 를 True...
    • 오병주
      2002.08.02 18:55
      지송합니다...^^:; 소스를 한번 올려보세요..^^;;
    • 미러
      2002.08.02 18:58
      summary는 인쇄물 제일 마지막에  나오는거 아닌가요? 전 그렇게 알고 있는데.. 제가 하고 싶...
    • 오병주
      2002.08.02 19:38
    • 미소나눔
      2002.08.02 11:21
      var   Ary : array[1..5, 1..5] of integer;     즐푸..~
    • cell
      2002.08.03 01:52
      많은 분들이 도와주셨네요... 감사합니다. 다음주부터 코딩이라 그때 해봐야 되겠네요...
    • 김경록
      2002.08.02 19:12
      이건 별로 어려운건 아닙니다. 일단, 컴포넌트 Database1, Database2를 폼에 두고, 해당 컴포넌트에 님...
    • 머슴
      2002.08.02 18:26
        서버가 다른경우에..DATABASE LINK 라는것으로 해결을 보셔야 합니다.   네트워...
    • 이추형
      2002.08.02 18:44
      오라클 클라이언트 설치된 디렉토리에서 TNSNAMES.ORA라는 파일을 수정해 주셔야합니다. sample.WORLD ...
    • 머슴
      2002.08.02 19:26
      오라클 클라이언트 설치된 디렉토리에서 TNSNAMES.ORA라는 파일을 수정안해줘도 될것 같은데요.. 왜냐하...
    • 미소나눔
      2002.08.02 11:26
      저도 몰라서 물어봤는데 SQL Server 는 OPENROWSET 를 사용해봐라 하는데용.. 오라클도 있을듯..
    • 델초보
    • 2002.08.02 08:19
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 미소나눔
      2002.08.02 09:20
      procedure TForm1.DBGrid1TitleClick(Column: TColumn); begin     if Column.Field...
    • 문미령
    • 2002.08.02 08:11
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 오병주
      2002.08.02 18:56
      이렇게 봐서는 어디가 문제인지 잘모르겠군요... ^^; 코딩내용을 올려보세요..^^;
    • 김형수
    • 2002.08.02 05:26
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 최여옥
      2002.08.02 22:16
      우선은 component 추가방법입니다. 1. component 메뉴을 누르고 install Component... 를 실행한다. 2. B...
    • 김경록
      2002.08.02 19:33
      QUERY에 대한 Tunning이 가능한지 여부를 먼저 묻고 싶습니다. 또한, Rollback Segment에서 자동을 Shrink...
    • KDDG_ZZOM
      2002.08.02 03:36
      맞는지는 모르지만... 템프러리 테이블스페이스가 오버 된것같네요... 쿼리할때 그룹함수나 오더바이하면 ...
    • 서계원
    • 2002.08.02 02:58
    • 0 COMMENTS
    • /
    • 0 LIKES
    • 김희경
    • 2002.08.02 02:16
    • 0 COMMENTS
    • /
    • 0 LIKES
    • 신익철
    • 2002.08.02 02:13
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 최용일
      2002.08.02 12:04
      안녕하세요. 최용일입니다. 왜 좌측에 하실려구 하나요? 이러한 비표준 UI는 사용자들에게 별로 환영받...
    • 최용일
      2002.08.02 12:10
      안녕하세요. 최용일입니다. 델파이 버전에 따라서 있는거 있구 없는거 있을겁니다... 델파이 버전 확...
    • 델파이사랑
      2002.08.02 19:03
      델파이 버전 6 엔터프라이즈 입니다........쩝...... 원래 여기에 없는 건가여......update 팩 1, 2를 ...
    • 백재현
    • 2002.08.02 01:22
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 2002.08.02 01:49
      예전에 최용일님이 올리신 글입니다. 안녕하세요. 최용일입니다. 검색해보시면 많이 나와 있는데....
    • 권영진
    • 2002.08.02 00:38
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 오병주
      2002.08.02 19:01
      글쎄여 ~ 스트링 그리드는 너무 다른 여러가지 표시를 하기에는 제약이 많구여... Advgrid6을 한번 ...
    • 수서니
    • 2002.08.02 00:14
    • 3 COMMENTS
    • /
    • 0 LIKES
    • KDDG_ZZOM
      2002.08.02 00:36
        frmSelect.ZMqryClist.sql.Add(' CNAME LIKE :name ');   frmSelect.ZMqryClist.pa...
    • 박규형
      2002.08.03 04:55
      약간 틀린부분이 있어서 사족을 답니다... 'select * from customer where cname like ' + '%' + &...
    • 수서니
      2002.08.02 02:32
      디비 세팅중이라 아직 테스트는 못해봤지만 감사합니다요~
    • 미소나눔
      2002.08.02 09:26
      TDataSet 객체들은 DataSet.Open 했을 때 데이타베이스에 쿼리한 결과를 데이타버퍼에 저장합니다. 데이타...
    • 이인수
      2002.08.02 20:08
      안녕하세요 이인수입니다. 우선 답변해주신거 감사드립니다.. ^^: 그런데요... TDataSet이라구...