UpdateSQL 이용시 에러.



Query로 자료를 읽어들인 후에 DBGrid통해서 수정을 합니다.



그 다음에는 ApplyUdates를 이용해서 변경 내용을 반영 시킬려고 하는데



자꾸만 "Updatd Failed" 메시지만 나오네요.



UpdateSQL컴포넌트를 통하지 않으면 되거든요. 근데 Query컴포넌트와



UpdateSQL컴포넌트를 연결해서 해보면 안되더라구요.



아래 코딩 내용 좀 봐 주세요.



procedure TOff_Input.Button1Click(Sender: TObject);

begin

// Local_DM1.off_input.ApplyUpdates;

Local_DM1.localdb.starttransaction; -- 이 라인을 컴파일 후에 insight해보면

try -- "Inaccessible Values"하는

Local_DM1.off_input.ApplyUpdates; -- 에러가 나오던데 그게 실행이

Local_DM1.localdb.commit; -- 안되고 있다는 뜻인가요?

except

Local_DM1.localdb.rollback;

raise;

end;

// Local_DM1.database1.commitupdates;}

end;





procedure TLocal_DM1.Off_InputUpdateRecord(DataSet: TDataSet;

UpdateKind: TUpdateKind; var UpdateAction: TUpdateAction);

begin

Local_DM1.UpdateSQL1.Apply(updatekind);

UpdateAction := uaApplied;

end;

기본프린터에 직접 쓰기 팁 입니다.

아마도 업무용 개발자분께는 아주 유용한 자료가 되리라 생각이 듭니다.





unit Unit1;



interface



uses

Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, printers,

StdCtrls;



type

TForm1 = class(TForm)

Button1: TButton;

procedure Button1Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;



var

Form1: TForm1;



implementation



{$R *.DFM}

Type

TPassThroughData = Record

nLen : Integer;

Data : Array[0..255] of byte;

end;



Procedure DirectPrint(s : String);

var

PTBlock : TPassThroughData;

Begin

PTBlock.nLen := Length(s);

StrPCopy(@PTBlock.Data,s);

Escape(printer.handle, PASSTHROUGH,0,@PTBlock,nil);

End;



Procedure PrintTest;

Begin

Printer.BeginDoc;

DirectPrint(CHR(14)+'My Name is ik-dong Park');

Printer.EndDoc;

End;



procedure TForm1.Button1Click(Sender: TObject);

begin

PrintTest;

end;



end.





이동화 wrote:

> 안녕하세요..

> 이상한 질문 하나 하겠습니다. 아직 컴퓨터에대해 잘 몰라서...

> 도트프린터기에 대해서 질문 하나 하겠습니다...

> 내가 원하는 내용을 출력시키는데 내용이 1 줄이던 10 줄이던간에

> 프린트하면 A4용지 1장이 그대로 프린터에서 배출됨니다...

> 당연히 10줄 밑으로는 공백이 되고....

> 그러니까 만약에 10줄을 출력시키고 종이가 나오지않고 프린터기가 11번째 줄

> 에서 스톱한다는 말입니다...

> 말이 어렵나요? 나두 해깔리네...

> 한마디로 편의점에서 돈계산할때 영수증 나오는 것같이 되는거 말입니다...

> 부탁드림니다....

>

>

>

>