delphi AfterScrol

2165 단어 Delphi
query.next               ,    AfterScrol  。                  :

  :         DBGrid    ,    dataset AfterScroll  , DBGridA dataset     ,

DBGridB dataset          




procedure ADOQuery1_BeforePost ( DataSet : TDataSet); begin end; ADOQuery1 또는 연결된 DataSource의 데이터 집합이 변경된 후에 변경 사항을 메모리에 저장하기 전에 자극된 이벤트입니다. 지난번에 이 이벤트를 사용한 것은 수정된 데이터의 규범 여부를 판단하는 데 사용되었습니다. 규범에 맞지 않으면 다음과 같은 힌트를 드리겠습니다. 수정할 열과 연결된 Column은 ScoreprocedureADOQuery1BeforePost ( DataSet : TDataSet);】 var   score: string ; begin   score:=DataSet.FieldByName(‘score’).AsString;//수정된 데이터를 추출합니다 if ('score 불규칙') then self.msgWarning(''에 입력한 데이터가 잘못되었습니다.end; procedure ADOQuery1_AfterScroll (DataSet: TDataSet); begin
end;
ADOQuery1과 연결된 DBGridEh1의 기록을 클릭한 후 자극된 이벤트로 두 개의 DBGridEh 컨트롤과 관련된 이벤트를 만들 수 있습니다.예를 들어 DBGridEh1의 기록 1을 클릭하면 DBGridEh2에 기록 1의 상세한 정보를 표시한다(예를 들어 다음과 같다: procedureADOQuery1AfterScroll(DataSet: TDataSet); var   sql: string ; begin   sql := ’ select * from tableneme where key = ’ ” + ADOQuery1.fieldbyname     (‘ key ’).AsString + ” ’ ’ ADOQuery2.sql.Close;   ADOQuery2.sql.Clear;   ADOQuery2.sql.Add(sql);   ADOQuery2.sql.Open; end;

좋은 웹페이지 즐겨찾기