버튼 타이머를 만들려고 합니다.

그것은 이런형식으로 만들려고 하는데



필드명 (오늘날짜) / (버튼을 누른시간) / (버튼을 누른시간)

(또 버튼을 누르면 다음 레코드로 위와 같이 자동으로 저장시키려고 합니다.)



문제는 처음 레코드는 잘 되는데 다음 레코드부터 처음 필드명의 (버튼을 누른 시간)에만 계속 레코드가 추가하는 군요. 다음 필드에 저장이 되어야 하는데 방법이 없나요.

죽겠습니다. 머리도 아프고 벌써 15일째 이짓입니다.

부탁드립니다. 고수님들...





procedure TForm4.Button1Click(Sender: TObject);

var

stoptime : tdatetime;

//bun : string;

begin

stoptime := time ;

table1.last;

if table1['outtime'] = '' then

table1['outtime'] := stoptime

else

table1.append;

table1['intime'] := stoptime

end;



procedure TForm4.Button2Click(Sender: TObject);

var

stoptime : tdatetime;

//hook : string;

begin

stoptime := now;

table1.last;

table1.edit;

table1.insert;

table1['intime'] := formatdatetime('hh:nn:ss',stoptime);

table1.post;

end;