Q&A

  • [Paradox] 쿼리가 안돼서 빡도는군여..--
안녕하세여.. 타락임다...ㅠㅠ



음냐뤼.. 물어볼 사람두 없는데,, 쿼리가 안되서 머리가 빠게지는군여....ㅠㅠ



팁모아의 "스트링그리드에 체크박스넣는 법" 보셨나여???



음냐뤼.. 여러 줄의 스트링 그리드를 테이블에 추가하려는데,



Valuse 라는 예약어를 잘못썼다구 에러가 뜨네여...--



왜 에러가 뜨는지.. 어케 해야 할지 모르겠어여...--+



답변 바랍니다...--++



아래가 문제 코드..





if IsNewGrid = True then // 새로운 그리드를 만들었는가?

begin // Insert 한다.

// TimeBook Table에 스트링그리드의 데이터를 넣는다.

DM.qryTimeBook.Close;

for i := 1 to RCount do

with DM.qryTimeBook do

with sgTimeBook do

begin

// Close;

SQL.Clear;

SQL.Add('Insert Into TimeBook');

SQL.Add('(TimeBookDay, StaffID, StaffName, StaffDuty, bLate, bEarlier, bIllegalAbsence, bLegalAbsence)');

SQL.Add('Valuse ( :N1, :N2, :N3, :N4, :N5, :N6, :N7, :N8 )');

// 날짜를 받는다.

ParamByName('N1').AsString := Cells[0, i];

// 직원 ID 를 받는다.

ParamByName('N2').AsString := Cells[1, i];

// 직원명을 받는다.

ParamByName('N3').AsString := Cells[2, i];

// 직책을 받는다.

ParamByName('N4').AsString := Cells[3, i];



// 체크박스를 받는다.

ParamByName('N5').AsBoolean :=

TCheckBox(Objects[4, i]).Checked;

ParamByName('N6').AsBoolean :=

TCheckBox(Objects[5, i]).Checked;

ParamByName('N7').AsBoolean :=

TCheckBox(Objects[6, i]).Checked;

ParamByName('N8').AsBoolean :=

TCheckBox(Objects[7, i]).Checked;



ExecSQL;

// Open;

end;

end;



부탁함다...T_T



고수님덜을 믿는... 왕초보 타락천사...^______________^



2  COMMENTS
  • Profile
    성호종 2000.06.30 23:13
    타락천사 wrote:

    values 입니다... ^^





    > 안녕하세여.. 타락임다...ㅠㅠ

    >

    > 음냐뤼.. 물어볼 사람두 없는데,, 쿼리가 안되서 머리가 빠게지는군여....ㅠㅠ

    >

    > 팁모아의 "스트링그리드에 체크박스넣는 법" 보셨나여???

    >

    > 음냐뤼.. 여러 줄의 스트링 그리드를 테이블에 추가하려는데,

    >

    > Valuse 라는 예약어를 잘못썼다구 에러가 뜨네여...--

    >

    > 왜 에러가 뜨는지.. 어케 해야 할지 모르겠어여...--+

    >

    > 답변 바랍니다...--++

    >

    > 아래가 문제 코드..

    >

    >

    > if IsNewGrid = True then // 새로운 그리드를 만들었는가?

    > begin // Insert 한다.

    > // TimeBook Table에 스트링그리드의 데이터를 넣는다.

    > DM.qryTimeBook.Close;

    > for i := 1 to RCount do

    > with DM.qryTimeBook do

    > with sgTimeBook do

    > begin

    > // Close;

    > SQL.Clear;

    > SQL.Add('Insert Into TimeBook');

    > SQL.Add('(TimeBookDay, StaffID, StaffName, StaffDuty, bLate, bEarlier, bIllegalAbsence, bLegalAbsence)');

    > SQL.Add('Valuse ( :N1, :N2, :N3, :N4, :N5, :N6, :N7, :N8 )');

    > // 날짜를 받는다.

    > ParamByName('N1').AsString := Cells[0, i];

    > // 직원 ID 를 받는다.

    > ParamByName('N2').AsString := Cells[1, i];

    > // 직원명을 받는다.

    > ParamByName('N3').AsString := Cells[2, i];

    > // 직책을 받는다.

    > ParamByName('N4').AsString := Cells[3, i];

    >

    > // 체크박스를 받는다.

    > ParamByName('N5').AsBoolean :=

    > TCheckBox(Objects[4, i]).Checked;

    > ParamByName('N6').AsBoolean :=

    > TCheckBox(Objects[5, i]).Checked;

    > ParamByName('N7').AsBoolean :=

    > TCheckBox(Objects[6, i]).Checked;

    > ParamByName('N8').AsBoolean :=

    > TCheckBox(Objects[7, i]).Checked;

    >

    > ExecSQL;

    > // Open;

    > end;

    > end;

    >

    > 부탁함다...T_T

    >

    > 고수님덜을 믿는... 왕초보 타락천사...^______________^

    >

  • Profile
    타락천사 2000.06.30 23:21
    안녕하세여.. 타락임다..^^



    히궁.. 쪽팔려라...



    쩌비.. 자기 실수는 발견하기 힘들져...ㅠㅠ



    답변 감사함다..^^



    왕초보 타락천사...^________^



    성호종 wrote:

    > 타락천사 wrote:

    > values 입니다... ^^

    >

    >

    > > 안녕하세여.. 타락임다...ㅠㅠ

    > >

    > > 음냐뤼.. 물어볼 사람두 없는데,, 쿼리가 안되서 머리가 빠게지는군여....ㅠㅠ

    > >

    > > 팁모아의 "스트링그리드에 체크박스넣는 법" 보셨나여???

    > >

    > > 음냐뤼.. 여러 줄의 스트링 그리드를 테이블에 추가하려는데,

    > >

    > > Valuse 라는 예약어를 잘못썼다구 에러가 뜨네여...--

    > >

    > > 왜 에러가 뜨는지.. 어케 해야 할지 모르겠어여...--+

    > >

    > > 답변 바랍니다...--++

    > >

    > > 아래가 문제 코드..

    > >

    > >

    > > if IsNewGrid = True then // 새로운 그리드를 만들었는가?

    > > begin // Insert 한다.

    > > // TimeBook Table에 스트링그리드의 데이터를 넣는다.

    > > DM.qryTimeBook.Close;

    > > for i := 1 to RCount do

    > > with DM.qryTimeBook do

    > > with sgTimeBook do

    > > begin

    > > // Close;

    > > SQL.Clear;

    > > SQL.Add('Insert Into TimeBook');

    > > SQL.Add('(TimeBookDay, StaffID, StaffName, StaffDuty, bLate, bEarlier, bIllegalAbsence, bLegalAbsence)');

    > > SQL.Add('Valuse ( :N1, :N2, :N3, :N4, :N5, :N6, :N7, :N8 )');

    > > // 날짜를 받는다.

    > > ParamByName('N1').AsString := Cells[0, i];

    > > // 직원 ID 를 받는다.

    > > ParamByName('N2').AsString := Cells[1, i];

    > > // 직원명을 받는다.

    > > ParamByName('N3').AsString := Cells[2, i];

    > > // 직책을 받는다.

    > > ParamByName('N4').AsString := Cells[3, i];

    > >

    > > // 체크박스를 받는다.

    > > ParamByName('N5').AsBoolean :=

    > > TCheckBox(Objects[4, i]).Checked;

    > > ParamByName('N6').AsBoolean :=

    > > TCheckBox(Objects[5, i]).Checked;

    > > ParamByName('N7').AsBoolean :=

    > > TCheckBox(Objects[6, i]).Checked;

    > > ParamByName('N8').AsBoolean :=

    > > TCheckBox(Objects[7, i]).Checked;

    > >

    > > ExecSQL;

    > > // Open;

    > > end;

    > > end;

    > >

    > > 부탁함다...T_T

    > >

    > > 고수님덜을 믿는... 왕초보 타락천사...^______________^

    > >

    • 꾸리
    • 2000.06.30 23:29
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 조규춘
      2000.07.01 01:02
      꾸리 wrote: > 델파이에서 엑셀화일로 받는 것처럼.. 이거는 무신 이야기인지 전혀 모르것군요... 헤...
    • 성호종
      2000.06.30 23:13
      타락천사 wrote: values 입니다... ^^ > 안녕하세여.. 타락임다...ㅠㅠ > > 음냐뤼.. 물어볼 사람...
    • 타락천사
      2000.06.30 23:21
      안녕하세여.. 타락임다..^^ 히궁.. 쪽팔려라... 쩌비.. 자기 실수는 발견하기 힘들져...ㅠㅠ 답변...
    • 영호
    • 2000.06.30 23:11
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 김경식
      2000.06.30 23:59
      제가 모아놓은 팁에 있어서 올립니다. 이 글을 적어주신 분의 성함을 몰라서 죄송시럽네요. ^^; 마음으로...
    • 성더기
    • 2000.06.30 22:53
    • 2 COMMENTS
    • /
    • 0 LIKES
    • 심동훈
      2000.06.30 23:38
      안녕하세요? 심동훈입니다. Application.MessageBox 를 사용해보세요. 도움말에 보시면 자세히 나와있...
    • 성더기
      2000.07.01 01:43
      심동훈 wrote: > 안녕하세요? > 심동훈입니다. > > Application.MessageBox 를 사용해보세요. > 도움...
    • somoon
    • 2000.06.30 22:57
    • 5 COMMENTS
    • /
    • 0 LIKES
    • somoon
      2000.07.01 00:07
      감사합니다. 박철우님, 그런데요. 역시 똑 같은 에러가 나는군요. 전체 코드를 올리오니, 이 불쌍한 ...
    • 성호종
      2000.06.30 22:59
      somoon wrote: procedure TForm1.Button1Click(Sender: TObject); begin with Query1 do begin c...
    • 조상
      2000.06.30 23:58
      안녕하세요. Query 컴포넌트를 Form에 추가 안하셨군요.. Query 컴포넌트는 'Data Acess' 컴포넌트파레트...
    • 박철우
      2000.06.30 23:50
      성호종 wrote: > somoon wrote: > procedure TForm1.Button1Click(Sender: TObject); > begin > wit...
    • somoon
      2000.06.30 23:30
      감사합니다. 님의 코드를 실행하니 다음과 같은 에러가 납니다. 한번더 살펴 봐 주십시오. 저의 코드는 ...
    • pomi
    • 2000.06.30 22:28
    • 0 COMMENTS
    • /
    • 0 LIKES
    • 박철우
      2000.07.01 00:00
      강인모 wrote: > 수고하십니다. > 물어볼 질문을 요약하면, > Query(Query1) --> Datasource(SellDBS)...
    • 델초
    • 2000.06.30 21:16
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 조규춘
      2000.06.30 21:40
      델초 wrote: > 안녕하세요!!! > 저는 델파이로 윈도우 바탕화면용 캐릭터 프로그램을 만들려고 하는 초...
    • 준희
    • 2000.06.30 21:11
    • 5 COMMENTS
    • /
    • 0 LIKES
    • 김희중
      2000.07.01 20:57
      제가 보기에는 DB그리드가 아니라 스트링그리드를 사용하신 것 같은데 맞는지요? 혹시 그렇다면 그 부분에...
    • 성호종
      2000.06.30 23:12
      준희 wrote: source에 있는 select 문장은 join 이 없고 between을 적절히 쓰셨기
    • 준희
      2000.06.30 23:25
      아래의 Source대로 하면 조회하는데 프로그램을 실행시키면 무지무지무지 오래 걸리는 것 같거던요? 다운된...
    • 갱수
      2000.07.01 00:13
      준희 wrote: > 아래의 Source대로 하면 조회하는데 프로그램을 실행시키면 무지무지무지 오래 걸리는 것 ...
    • 성호종
      2000.07.01 01:14
      갱수 wrote: stored procedure 는 좀더 복잡하고 연산된 결과를 얻기위하여 DB 가 제공하는 language 입니...
    • 김주현
    • 2000.06.30 21:09
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 성호종
      2000.06.30 23:15
      김주현 wrote: field의 type속성이 빠졌네요.. table[8].asdate 가 아닐까 싶네요... ^^ > procedure ...
    • queen
    • 2000.06.30 21:02
    • 1 COMMENTS
    • /
    • 0 LIKES
    • cell
      2000.06.30 21:27
      queen wrote: > ora-00933:sql명렴어가 올바르게 종료되지 않았습니다. > sql을 제대로 입력하지 않...
    • 2000.06.30 23:33
      홍기원 wrote: > > > 1. 오라클 테이블 필드 정의 내역 : 시간필드을 단독으로 콘트롤 해야 되...
    • 최용일
      2000.06.30 20:49
      안녕하세요. 최용일입니다. Exit함수가 있습니다. ^^ 항상 즐코하세요. 이병웅 wrote: > 고수님 ...
    • 초보
    • 2000.06.30 20:15
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 최용일
      2000.06.30 20:23
      안녕하세요. 최용일입니다. 델파이뿐만아니라 다른 모든 컴파일러에도 그러한 옵션은 없습니다. 컴파일...
    • 김만성
    • 2000.06.30 19:44
    • 1 COMMENTS
    • /
    • 0 LIKES
    • cell
      2000.06.30 19:50
      김만성 wrote: > Project Project2.exe raised exception class EDBEnginError with message 'General SQL...
    • 성호종
      2000.06.30 23:04
      초초보 wrote: edit에 OnChange Event 에서 Grid에 Open되어있는 table 또는 Query를 first; repeat ...
    • 최용일
      2000.06.30 20:29
      안녕하세요. 최용일입니다. 간단하게 만드실려면 TMemo나 TRichEdit를 이용하시면 됩니다. 델파이 소스...
    • 이미나
      2000.06.30 21:20
      질문 1에 대한 답을 다른 델피언께서 올리셨더군요. 좀더 간단하고 속도빠른 방법이 있어서 갈켜드립니다....
    • 임형호
      2000.06.30 19:50
      사발우성 wrote: > > 하요 절정고수님들... 어제 질문을 잘못한듯 하네엽.. > > 다시 질문함당.....
    • ddd
      2000.07.07 05:44
      임형호 wrote: > 사발우성 wrote: > > > > 하요 절정고수님들... 어제 질문을 잘못한듯 하네엽.. > ...