table.First; // 처음
table.Prior; // 이전
table.Next; // 다음
table.Last; // 마지막
이장훈 님이 쓰신 글 :
: 안녕하세요 델파이5.0으로 한창 공부하는 학생입니다.
:
: DB를 하는중인대요. DB는 paradox7로 했구요
:
: 필드는 3개 만들어 보았어요
:
: class Irum jumin 이렇게 3개를 만들었구요
:
: DataSource를 사용하지 않고 일반 에디터에서 db자료가 출력 대게 하는건대요
:
: Edit에서는 나오는대 first,next,prior 메소드가 일반 버튼에서 먹히게 할려면 어떻게 해야대나요?
:
: 대충소스는 이러합니다
:
: unit Unit1;
:
: interface
:
: uses
: Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
: StdCtrls, Db, DBTables;
:
: type
: TForm1 = class(TForm)
: Edit1: TEdit;
: Edit2: TEdit;
: Edit3: TEdit;
: Table1: TTable;
: Button1: TButton;
: procedure FormCreate(Sender: TObject);
: procedure Button1Click(Sender: TObject);
: private
: { Private declarations }
: public
: { Public declarations }
: end;
:
: var
: Form1: TForm1;
:
: implementation
:
: {$R *.DFM}
:
: procedure TForm1.FormCreate(Sender: TObject);
: begin
: with table1 do
: begin
: edit1.Text := intToStr(fieldbyname('ban').AsInteger);
: edit2.Text := fieldbyname('irum').AsString;
: edit3.Text := fieldbyname('jumin').AsString;
: end;
: end;
:
: 여기가 table객체 수준에 있는 next메서드를 활용하는 부분입니다.
:
: procedure TForm1.Button1Click(Sender: TObject);
: begin
: table1. 머라 적어 줘야대나요 ?ㅡㅡ;
: end;
:
: end.
|