Q&A
- 'Syntax error ... in query expression' 에러 원인?
주소록을 델파이로 짜고 있거든요...
전 왕초보인데... 델파이로 이 프로그램을 꼭 짜야하기때문에 이렇게 부탁을 드립니다.
저장하는 부분에서 에러가 나는데요... 왜 이런 에러가 나는지 ....
에러 부분을 올립니다.
이게 무슨 에러인지...
알려주시면 감사합니다.
더불어 그와 관련된 소스를 구할 수 있음 더 좋구요..
project project1.exe raised exception class EOleException with message
'Syntax error (missing operator) in query expression'?
전화번호 = ?''.
Process stopped. Use Step or Run to contunue.
이게 무슨 에러인지 ?
DB_Refresh;
컴파일은 되거든요... 근데 이 부분에서 포커스가 맞춰지더군요...
소스를 확인해보았는데 잘 안되서요...
전 왕초보인데... 델파이로 이 프로그램을 꼭 짜야하기때문에 이렇게 부탁을 드립니다.
저장하는 부분에서 에러가 나는데요... 왜 이런 에러가 나는지 ....
에러 부분을 올립니다.
이게 무슨 에러인지...
알려주시면 감사합니다.
더불어 그와 관련된 소스를 구할 수 있음 더 좋구요..
project project1.exe raised exception class EOleException with message
'Syntax error (missing operator) in query expression'?
전화번호 = ?''.
Process stopped. Use Step or Run to contunue.
이게 무슨 에러인지 ?
DB_Refresh;
컴파일은 되거든요... 근데 이 부분에서 포커스가 맞춰지더군요...
소스를 확인해보았는데 잘 안되서요...
3
COMMENTS
-
-
소스이구여...DB는 ADO객체를 사용했거든여...
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
Grids, DBGrids, StdCtrls, Buttons, Mask, Db, ADODB;
type
TForm1 = class(TForm)
DataSource1: TDataSource;
ADOQuery1: TADOQuery;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Label5: TLabel;
Edit1: TEdit;
Edit2: TEdit;
Edit3: TEdit;
Edit4: TEdit;
MaskEdit1: TMaskEdit;
BitBtn1: TBitBtn;
BitBtn2: TBitBtn;
BitBtn3: TBitBtn;
BitBtn4: TBitBtn;
BitBtn5: TBitBtn;
DBGrid1: TDBGrid;
ADOTable1: TADOTable;
procedure BitBtn5Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure BitBtn4Click(Sender: TObject);
procedure BitBtn1Click(Sender: TObject);
procedure BitBtn3Click(Sender: TObject);
procedure BitBtn2Click(Sender: TObject);
procedure DBGrid1MouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
procedure DBGrid1KeyUp(Sender: TObject; var Key: Word;
Shift: TShiftState);
private
DB_Insert: string;
procedure DB_Refresh;
procedure DB_Input;
procedure Cls_Edit;
procedure Dsp_Edit;
procedure Move_Cell;
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.DB_Refresh;
begin
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('Select * from address');
ADOQuery1.SQL.Add(' Order by 이름');
ADOQuery1.Open;
end;
procedure TForm1.DB_Input;
begin
ADOQuery1.Parameters.ParamValues['N1'] := Trim(Edit1.Text);
ADOQuery1.Parameters.ParamValues['N2'] := Trim(Edit2.Text);
ADOQuery1.Parameters.ParamValues['N3'] := Trim(Edit3.Text);
if Trim(MaskEdit1.Text) = '-' then
ADOQuery1.Parameters.ParamValues['N4'] := ''
else
ADOQuery1.Parameters.ParamValues['N4'] := Trim(MaskEdit1.Text);
ADOQuery1.Parameters.ParamValues['N5'] := Trim(Edit4.Text);
end;
procedure TForm1.Cls_Edit;
begin
Edit1.Text := '';
Edit2.Text := '';
Edit3.Text := '';
Edit4.Text := '';
MaskEdit1.Text := '';
end;
procedure TForm1.Dsp_Edit;
begin
Edit1.Text := ADOQuery1.FieldbyName('이름').AsString;
Edit2.Text := ADOQuery1.FieldbyName('전화번호').AsString;
Edit3.Text := ADOQuery1.FieldbyName('핸드폰').AsString;
MaskEdit1.Text := ADOQuery1.FieldbyName('우편번호').AsString;
Edit4.Text := ADOQuery1.FieldbyName('주소').AsString;
end;
procedure TForm1.Move_Cell;
begin
if BitBtn1.Caption = '취소(&C)' then
begin
BitBtn1.Caption := '추가(&A)';
BitBtn2.Enabled := True;
BitBtn4.Enabled := True;
DB_Insert := '불가능';
end;
Dsp_Edit;
end;
procedure TForm1.BitBtn5Click(Sender: TObject);
begin
Close;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
Cls_Edit;
Dsp_Edit;
DB_Insert := '불가능';
end;
procedure TForm1.BitBtn4Click(Sender: TObject);
var
Input_Str : string;
begin
Input_Str := InputBox('이름 입력', '찾을 이름을 입력하세요','');
if Trim(Input_Str) <> '' then
begin
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('Select * from address');
ADOQuery1.SQL.Add('Where 이름 Like :NAME1');
ADOQuery1.Parameters.ParamByName('NAME1').Value := '%'+Input_Str+'%';
ADOQuery1.Open;
end;
end;
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
if BitBtn1.Caption = '추가(&A)' then
begin
DB_Insert := '가능';
BitBtn1.Caption := '취소(&C)';
BitBtn2.Enabled := False;
BitBtn4.Enabled := False;
Cls_Edit;
end
else
begin
DB_Insert := '불가능';
BitBtn1.Caption := '추가(&A)';
BitBtn2.Enabled := True;
Bitbtn4.Enabled := True;
DB_Refresh;
Dsp_Edit;
end;
Edit1.SetFocus;
end;
procedure TForm1.BitBtn3Click(Sender: TObject);
var
Select_no : integer;
begin
if Trim(Edit1.Text) = '' then
begin
ShowMessage('이름을 입력하지 않으면 추가나 저장을 할 수 없습니다.');
Edit1.SetFocus;
Exit;
end;
if DB_Insert = '가능' then
begin
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQUery1.SQL.Add('Insert Into address');
ADOQuery1.SQL.Add('이름,전화번호,핸드폰,우편번호,주소');
ADOQuery1.SQL.Add('Values');
ADOQuery1.SQL.Add('( :N1, ');
ADOQuery1.SQL.Add(' :N2, ');
ADOQuery1.SQL.Add(' :N3, ');
ADOQuery1.SQL.Add(' :N4, ');
ADOQuery1.SQL.Add(' :N5)');
DB_Input;
DB_Insert := '불가능';
BitBtn1.Caption := '추가(&A)';
BitBtn2.Enabled := True;
BitBtn4.Enabled := True;
end
else
begin
Select_no := ADOQuery1.FieldByName('번호').AsInteger;
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQUery1.SQL.Add('Update 주소');
ADOQuery1.SQL.Add('Set 이름 = :N1');
ADOQuery1.SQL.Add('전화번호 = :N2, ');
ADOQuery1.SQL.Add('핸드폰 = :N3, ');
ADOQuery1.SQL.Add('우편번호 = :N4, ');
ADOQuery1.SQL.Add('주소 = :N5)');
ADOQuery1.SQL.Add('Where 번호 = :N6');
DB_Input;
ADOQuery1.Parameters.ParamValues['N6'] := Select_no;
end;
ADOQuery1.ExecSQL;
DB_Refresh;
Edit1.SetFocus;
end;
procedure TForm1.BitBtn2Click(Sender: TObject);
var
ret_msg : integer;
Select_no : integer;
begin
if ADOQuery1.RecordCount <> 0 then
begin
ret_msg := MessageDlg('삭제하시겠습니까?', mtWarning, [mbYes, mbNo],0);
if ret_msg = mrYes then
begin
Select_no := ADOQuery1.FieldByName('번호').AsInteger;
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('Delete * from address');
ADOQuery1.SQL.Add('Where 번호 = :N1');
ADOQuery1.Parameters.ParamValues['N1'] := Select_no;
ADOQuery1.ExecSQL;
DB_Refresh;
Dsp_Edit;
end
else
Application.MessageBox('삭제가 취소되었습니다.', '삭제취소',MB_OK);
end;
end;
procedure TForm1.DBGrid1MouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
if Button = mbLeft then
Move_cell;
end;
procedure TForm1.DBGrid1KeyUp(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (key >= 33) And (key <= 40) then
Move_Cell;
end;
end.
-
제가 보기엔 SQL문 대입시(add) 앞줄과 뒷줄의 띄워쓰기 문제같거든여..
insert문을 예로 들때 이름과 전화번호필드가 같이 합쳐져서 SQL문이 완성된듯 싶네요.
띄워쓰기를 한번 확인해보세요..
참고로 Add문대신 Text문을 활용해보시면 더 편할겁니다..
제가 코딩하는 스타일을 올려드릴께염..
(제가 만든 프로그램의 일부분임다)
implementation
{$R *.DFM}
const
//==============================================================================
// Queries
//==============================================================================
SELECT_MAX_CODE =
'SELECT MAX(체크번호) as 체크번호 FROM cmCheck ';
SELECT_DATA =
'SELECT * FROM cmCheck ORDER BY 체크번호';
INSERT_DATA =
'INSERT INTO cmCheck ( 체크번호, 운송업체번호, 체크명) '+
' VALUES (:체크번호, :운송업체번호, :체크명) ';
UPDATE_DATA =
'UPDATE cmCheck SET 운송업체번호 = :운송업체번호, '+
' 체크명 = :체크명 '+
' WHERE 체크번호 = :체크번호 ';
DELETE_DATA =
'DELETE FROM cmCheck '+
' WHERE 체크번호 = :체크번호 '+
' AND 운송업체번호 = :운송업체번호 ';
..
활용예)
..
procedure TfrmCM020.SelectData;
begin
with grdMain, qryMain do
begin
SQL.Text := SELECT_DATA;
Open;
if not IsEmpty then
while not EOF do
begin
AddRow;
// Cells 를 추가 한다
Cells[GR_NUM, RowCount -1].Asstring := FieldByName('체크번호' ).AsString;
Cells[GR_NAME, RowCount -1].AsString := FieldByName('체크명' ).AsString;
Cells[GR_COMPNUM, RowCount -1].Asstring := FieldByName('운송업체번호').AsString;
Next;
end;
end;
end;
이윤선 wrote:
> 소스이구여...DB는 ADO객체를 사용했거든여...
>
> unit Unit1;
>
> interface
>
> uses
> Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
> Grids, DBGrids, StdCtrls, Buttons, Mask, Db, ADODB;
>
> type
> TForm1 = class(TForm)
> DataSource1: TDataSource;
> ADOQuery1: TADOQuery;
> Label1: TLabel;
> Label2: TLabel;
> Label3: TLabel;
> Label4: TLabel;
> Label5: TLabel;
> Edit1: TEdit;
> Edit2: TEdit;
> Edit3: TEdit;
> Edit4: TEdit;
> MaskEdit1: TMaskEdit;
> BitBtn1: TBitBtn;
> BitBtn2: TBitBtn;
> BitBtn3: TBitBtn;
> BitBtn4: TBitBtn;
> BitBtn5: TBitBtn;
> DBGrid1: TDBGrid;
> ADOTable1: TADOTable;
> procedure BitBtn5Click(Sender: TObject);
> procedure FormCreate(Sender: TObject);
> procedure BitBtn4Click(Sender: TObject);
> procedure BitBtn1Click(Sender: TObject);
> procedure BitBtn3Click(Sender: TObject);
> procedure BitBtn2Click(Sender: TObject);
> procedure DBGrid1MouseUp(Sender: TObject; Button: TMouseButton;
> Shift: TShiftState; X, Y: Integer);
> procedure DBGrid1KeyUp(Sender: TObject; var Key: Word;
> Shift: TShiftState);
> private
> DB_Insert: string;
> procedure DB_Refresh;
> procedure DB_Input;
> procedure Cls_Edit;
> procedure Dsp_Edit;
> procedure Move_Cell;
> { Private declarations }
> public
> { Public declarations }
> end;
>
> var
> Form1: TForm1;
>
> implementation
>
> {$R *.DFM}
>
> procedure TForm1.DB_Refresh;
> begin
> ADOQuery1.Close;
> ADOQuery1.SQL.Clear;
> ADOQuery1.SQL.Add('Select * from address');
> ADOQuery1.SQL.Add(' Order by 이름');
> ADOQuery1.Open;
> end;
>
> procedure TForm1.DB_Input;
> begin
> ADOQuery1.Parameters.ParamValues['N1'] := Trim(Edit1.Text);
> ADOQuery1.Parameters.ParamValues['N2'] := Trim(Edit2.Text);
> ADOQuery1.Parameters.ParamValues['N3'] := Trim(Edit3.Text);
>
> if Trim(MaskEdit1.Text) = '-' then
> ADOQuery1.Parameters.ParamValues['N4'] := ''
> else
> ADOQuery1.Parameters.ParamValues['N4'] := Trim(MaskEdit1.Text);
>
> ADOQuery1.Parameters.ParamValues['N5'] := Trim(Edit4.Text);
> end;
>
> procedure TForm1.Cls_Edit;
> begin
> Edit1.Text := '';
> Edit2.Text := '';
> Edit3.Text := '';
> Edit4.Text := '';
> MaskEdit1.Text := '';
> end;
>
> procedure TForm1.Dsp_Edit;
> begin
> Edit1.Text := ADOQuery1.FieldbyName('이름').AsString;
> Edit2.Text := ADOQuery1.FieldbyName('전화번호').AsString;
> Edit3.Text := ADOQuery1.FieldbyName('핸드폰').AsString;
> MaskEdit1.Text := ADOQuery1.FieldbyName('우편번호').AsString;
> Edit4.Text := ADOQuery1.FieldbyName('주소').AsString;
>
> end;
>
> procedure TForm1.Move_Cell;
> begin
> if BitBtn1.Caption = '취소(&C)' then
> begin
> BitBtn1.Caption := '추가(&A)';
> BitBtn2.Enabled := True;
> BitBtn4.Enabled := True;
> DB_Insert := '불가능';
> end;
> Dsp_Edit;
> end;
>
> procedure TForm1.BitBtn5Click(Sender: TObject);
> begin
> Close;
> end;
>
> procedure TForm1.FormCreate(Sender: TObject);
> begin
> Cls_Edit;
> Dsp_Edit;
> DB_Insert := '불가능';
> end;
>
> procedure TForm1.BitBtn4Click(Sender: TObject);
> var
> Input_Str : string;
> begin
> Input_Str := InputBox('이름 입력', '찾을 이름을 입력하세요','');
>
> if Trim(Input_Str) <> '' then
> begin
> ADOQuery1.Close;
> ADOQuery1.SQL.Clear;
> ADOQuery1.SQL.Add('Select * from address');
> ADOQuery1.SQL.Add('Where 이름 Like :NAME1');
> ADOQuery1.Parameters.ParamByName('NAME1').Value := '%'+Input_Str+'%';
> ADOQuery1.Open;
> end;
>
> end;
>
>
> procedure TForm1.BitBtn1Click(Sender: TObject);
> begin
> if BitBtn1.Caption = '추가(&A)' then
> begin
> DB_Insert := '가능';
> BitBtn1.Caption := '취소(&C)';
> BitBtn2.Enabled := False;
> BitBtn4.Enabled := False;
> Cls_Edit;
> end
> else
> begin
> DB_Insert := '불가능';
> BitBtn1.Caption := '추가(&A)';
> BitBtn2.Enabled := True;
> Bitbtn4.Enabled := True;
> DB_Refresh;
> Dsp_Edit;
> end;
> Edit1.SetFocus;
> end;
>
> procedure TForm1.BitBtn3Click(Sender: TObject);
> var
> Select_no : integer;
> begin
> if Trim(Edit1.Text) = '' then
> begin
> ShowMessage('이름을 입력하지 않으면 추가나 저장을 할 수 없습니다.');
> Edit1.SetFocus;
> Exit;
> end;
>
> if DB_Insert = '가능' then
> begin
> ADOQuery1.Close;
> ADOQuery1.SQL.Clear;
> ADOQUery1.SQL.Add('Insert Into address');
> ADOQuery1.SQL.Add('이름,전화번호,핸드폰,우편번호,주소');
> ADOQuery1.SQL.Add('Values');
> ADOQuery1.SQL.Add('( :N1, ');
> ADOQuery1.SQL.Add(' :N2, ');
> ADOQuery1.SQL.Add(' :N3, ');
> ADOQuery1.SQL.Add(' :N4, ');
> ADOQuery1.SQL.Add(' :N5)');
> DB_Input;
> DB_Insert := '불가능';
> BitBtn1.Caption := '추가(&A)';
> BitBtn2.Enabled := True;
> BitBtn4.Enabled := True;
> end
> else
> begin
> Select_no := ADOQuery1.FieldByName('번호').AsInteger;
> ADOQuery1.Close;
> ADOQuery1.SQL.Clear;
> ADOQUery1.SQL.Add('Update 주소');
> ADOQuery1.SQL.Add('Set 이름 = :N1');
> ADOQuery1.SQL.Add('전화번호 = :N2, ');
> ADOQuery1.SQL.Add('핸드폰 = :N3, ');
> ADOQuery1.SQL.Add('우편번호 = :N4, ');
> ADOQuery1.SQL.Add('주소 = :N5)');
> ADOQuery1.SQL.Add('Where 번호 = :N6');
> DB_Input;
> ADOQuery1.Parameters.ParamValues['N6'] := Select_no;
> end;
>
> ADOQuery1.ExecSQL;
> DB_Refresh;
> Edit1.SetFocus;
> end;
>
> procedure TForm1.BitBtn2Click(Sender: TObject);
> var
> ret_msg : integer;
> Select_no : integer;
> begin
> if ADOQuery1.RecordCount <> 0 then
> begin
>
> ret_msg := MessageDlg('삭제하시겠습니까?', mtWarning, [mbYes, mbNo],0);
> if ret_msg = mrYes then
> begin
> Select_no := ADOQuery1.FieldByName('번호').AsInteger;
> ADOQuery1.Close;
> ADOQuery1.SQL.Clear;
> ADOQuery1.SQL.Add('Delete * from address');
> ADOQuery1.SQL.Add('Where 번호 = :N1');
> ADOQuery1.Parameters.ParamValues['N1'] := Select_no;
> ADOQuery1.ExecSQL;
> DB_Refresh;
> Dsp_Edit;
> end
> else
> Application.MessageBox('삭제가 취소되었습니다.', '삭제취소',MB_OK);
> end;
> end;
>
> procedure TForm1.DBGrid1MouseUp(Sender: TObject; Button: TMouseButton;
> Shift: TShiftState; X, Y: Integer);
> begin
> if Button = mbLeft then
> Move_cell;
> end;
>
> procedure TForm1.DBGrid1KeyUp(Sender: TObject; var Key: Word;
> Shift: TShiftState);
> begin
> if (key >= 33) And (key <= 40) then
> Move_Cell;
> end;
>
> end.
(NOTICE) You must be logged in to comment on this post.
-
- 쭉쭉빵빵
- •
- 2001.04.03 04:07
- 2 COMMENTS
- /
- 0 LIKES
-
류종택•2001.04.03 04:49Frame은 같은 부모에서 생성되는 콤포넌트 이기 때문에 동적 생성시 Name 프로퍼티를 바꿔주는 것이 당연...
-
쭉쭉빵빵•2001.04.03 05:10적어도 리소스 적게 먹는것은 맘에 드네요. 98에서 리소스와 한판 전쟁을 하고 있거든요. 류종택 wro...
-
- 이석현
- •
- 2001.04.03 03:59
- 5 COMMENTS
- /
- 0 LIKES
-
최용일•2001.04.03 22:25
-
이석현•2001.04.04 00:57
-
최용일•2001.04.04 01:54
-
이석현•2001.04.04 04:31
-
최용일•2001.04.04 21:02
-
- 초보
- •
- 2001.04.03 03:47
- 3 COMMENTS
- /
- 0 LIKES
-
임정영•2001.04.03 19:58흐흠..... 아마도 맞는지는 몰라도 메모리 에러인듯! 혹시 activex ocx 에서 여러 창을 여신다면 종료시...
-
초보•2001.04.04 02:47임정영님!! 그럼 메모리를 free 시키는 방법도 갈켜주셔야죵~~~ 부탁합니다.. 임정영 wrote: > 흐흠....
-
임정영•2001.07.05 16:55잘 알지도 못하는데 제 경험을 토대로 몇자 적어 보겠습니다. 먼저 ActiveX에서는 Tform을 Auto Create...
-
- 초보자
- 2001.04.03 03:43
- 0 COMMENTS
- /
- 0 LIKES
-
- 준초보
- •
- 2001.04.03 03:10
- 1 COMMENTS
- /
- 0 LIKES
-
쭉쭉빵빵•2001.04.03 03:38procedure Tform1.TreeView1Click(Sender: TObject); begin TreeView1.Selected
-
- 이윤선
- •
- 2001.04.03 13:02
- 3 COMMENTS
- /
- 0 LIKES
주소록을 델파이로 짜고 있거든요... 전 왕초보인데... 델파이로 이 프로그램을 꼭 짜야하기때문에 이렇게 부탁을 드립니다. 저장하는 부분에서 에러가 나는데요... 왜 이런 에러가 나는지 .... 에러 부분을 올립니다. 이게 무슨 에러인지...-
조복기•2001.04.03 13:04문법에러이니만큼 어떤 RDB를 사용하며 어떤 SQL문인지 같이 올려주셨음 하네여.. 이윤선 wrote: > ...
-
이윤선•2001.04.03 13:05소스이구여...DB는 ADO객체를 사용했거든여... unit Unit1; interface uses Windows, Messages...
-
조복기•2001.04.03 13:05제가 보기엔 SQL문 대입시(add) 앞줄과 뒷줄의 띄워쓰기 문제같거든여.. insert문을 예로 들때 이름과 ...
-
- 김명찬
- •
- 2001.04.03 03:06
- 1 COMMENTS
- /
- 0 LIKES
-
류종택•2001.04.03 04:40Main Menu --> Tools --> Invironment Options 화면에서 Autosave Options 에서 Editor Files를 선택...
-
- 호야
- •
- 2001.04.03 02:26
- 3 COMMENTS
- /
- 0 LIKES
-
좋은날•2001.04.04 21:02호야 wrote: > * 사용환경 : 델파이5 / Windows 98 > > 궁금한게 모냐면여... > > DB Grid 더블클릭...
-
바버•2001.04.03 03:18procedure TForm1.DBGrid1DblClick(Sender: TObject); begin Edit1.Text := Table1.FieldByName('COL_1...
-
호야•2001.04.03 03:37먼저 님의 답변 무지 감사드립니다... 근데 님의 대답은 저두 알고 있는 사실인데여.. 제가 알고자 ...
-
- 이창완
- •
- 2001.04.03 13:08
- 2 COMMENTS
- /
- 0 LIKES
-
홍세비•2001.04.03 13:08안냐세요. 홍세빕니다. hello.exe 파일이 있는 폴더의 권한이 '실행'으로 되어있는지 확인해 보세요. ...
-
이창완•2001.04.03 02:39홍세비 wrote: > 안냐세요. 홍세빕니다. > > hello.exe 파일이 있는 폴더의 권한이 '실행'으로 되어있...
-
- 감사혀
- •
- 2001.04.03 13:17
- 1 COMMENTS
- /
- 0 LIKES
-
류종택•2001.04.03 13:17MIDAS를 사용하세요!! 감사혀 wrote: > Database를 한번 Connect해놓고 여러 실행파일에서 접속하여 사...
-
- 서철기
- •
- 2001.04.03 00:28
- 2 COMMENTS
- /
- 0 LIKES
-
감초•2001.04.03 03:41저는 전에 게임방 프로그램에서 접속된 Client들의 IP를 알아낼때 서버에서 Edit1.text := Socket.Remote...
-
임정영•2001.04.03 20:01저도 미들웨어(Remote Data Module)에서 아래와 같이 어떤 클라이언트가 붙어 있는지 확인하고 제어 했는...
-
- 강동희
- •
- 2001.04.03 00:15
- 5 COMMENTS
- /
- 0 LIKES
-
hobakpa•2001.04.03 01:05강동희 wrote: > 사용할 db는 파라독스 타입의 trans.db입니다. > > trans.DB는 Query1컴포넌트에 연...
-
강동희•2001.04.03 03:30hobakpa wrote: > 강동희 wrote: > > 사용할 db는 파라독스 타입의 trans.db입니다. > > > > trans.D...
-
hobakpa•2001.04.03 04:05> 질문한 '강동희' 인데요... > Price필드의 검색은===> 범위(Range)를 주었거던요.... > 그래서,,, 다...
-
쭉쭉빵빵•2001.04.03 03:55price 가 numeric이라고 가정합니다. var s : string; with query1 do begin close; Sql.clea...
-
강동희•2001.04.03 08:23진지하고, 성의 있는 답변... 감사합니다.
-
- 이한
- •
- 2001.04.03 00:14
- 1 COMMENTS
- /
- 0 LIKES
-
Gromit•2001.05.16 12:48이한 wrote: > for tx := 0 to ImageRotated.Width - 1 do > for ty := 0 to ImageRotated.Height -...
-
- 권혁주
- •
- 2001.04.03 13:10
- 1 COMMENTS
- /
- 0 LIKES
-
ㅋㅋㅋ•2001.04.03 13:10속성에 InitialDir 이 있군여.. 여기서 디폴터 디렉토리를 작성하면... 권혁주 wrote: > 안녕 하세...
-
- 미티미티
- •
- 2001.04.03 13:16
- 1 COMMENTS
- /
- 0 LIKES
-
김일영•2001.04.03 13:16만들고자 하시는 패키지 즉 Package1이라는 패키지가 dclhrp40이라는 패키지를 암시적으로 사용하고 있어...
-
- 콩새
- 2001.04.03 00:08
- 0 COMMENTS
- /
- 0 LIKES
-
- 박 임선
- 2001.04.03 00:09
- 0 COMMENTS
- /
- 0 LIKES
-
- 델초보
- •
- 2001.04.02 21:40
- 1 COMMENTS
- /
- 0 LIKES
-
hobakpa•2001.04.02 23:34저도 허접입니다.... 40439번에 관련되어 고수들이 리플을 달았놓았어요... 아마도 60페이지에 있을겁...
-
- 윤종철
- •
- 2001.04.03 00:45
- 1 COMMENTS
- /
- 0 LIKES
-
칠라기•2001.04.03 00:45델파이 팁에 가면 있어용... 그정도의 노력을 해야죵...^^:
-
-
칠라기•2001.04.02 23:23모달 폼으로 띄어 봤어요..?? 쩝..
-
바버•2001.04.02 21:40델파이초보 wrote: > 안녕하세요 델파이 초보잡니다.. > 프로그램을 하나 만드는데.. > > MDI폼 1개 ...
-
문법에러이니만큼 어떤 RDB를 사용하며
어떤 SQL문인지 같이 올려주셨음 하네여..
이윤선 wrote:
> 좀더 자세하게 설명을 해주셨으면 좋겠네요...
>
> 제가 워낙 잘 몰라서...