Предыдущая страница реферата | 1  2  3  4  5  6  7  8 | Следующая страница реферата

end;

procedure TWebModule1.StoreQTPFormatCell(Sender: TObject;

  CellRow, CellColumn: Integer; var BgColor: THTMLBgColor;

  var Align: THTMLAlign; var VAlign: THTMLVAlign; var CustomAttrs,

  CellData: String);

 var s: string;

begin

 if (CellRow0) then if (CellRow mod 2=0) then BgColor:='silver' else BgColor:='Gray';

 if (OperKind>0) and (CellColumn=0) and (CellRow>0) then

  begin

  CellData := ''

  +CellData;

  end;

 if (OperKind>0) and (CellColumn=StoreQTP.Columns.Count-1) and (CellRow>0) then

  begin

  CellData := '¦рърчрЄ№';

  s := '
';

  end;

end;

procedure TWebModule1.StoreQTPGetTableCaption(Sender: TObject;

  var Caption: String; var Alignment: THTMLCaptionAlignment);

begin

 Caption :='=рщфхэю чряшёхщ: '+ IntToStr(StoreQTP.Query.RecordCount);

end;

procedure TWebModule1.WebModule1ValidateAction(Sender: TObject;

Рекомендуем скачать другие рефераты по теме: шпоры по социологии, бесплатные ответы.



Предыдущая страница реферата | 1  2  3  4  5  6  7  8 | Следующая страница реферата

Поделитесь этой записью или добавьте в закладки