Migrating DataValidation from 4 to 5
Posted: Mon Jun 24, 2013 2:05 pm
Hello;
I'm having trouble to upgrade an existing validation code written in Delphi 7:
1. TXlsDataValidation in unit XlsValidate5 does not have SetList method.
2. TDataValidation in unit BIFF_Validate5 does but cannot be added using ws.Validations.Add.
3. What is the purpose of the 3 types of source files starting with BIFF, XC12, XLS, and XPGP?
4. Is there any documentation describing this components?
Thank you for your help!
var
ws: TXLSWorksheet;
dv: TXlsDataValidation; //used to be TDataValidation which still have needed SetList method;
begin
dv := ws.Validations.Add;
dv.Areas.Add(0, cDataRowID + 1, 0, LastRow);
dv.ValidationType := x12dvtList;
dv.ValidationOperator := x12dvoBetween;
dv.ValidationStyle := x12dvesStop;
dv.SetList(['u', 'update', 'a', 'add', 'insert']);
dv.ErrorTitle := 'Invalid Action';
dv.ErrorMsg := 'Only values from the list can be used!';
I'm having trouble to upgrade an existing validation code written in Delphi 7:
1. TXlsDataValidation in unit XlsValidate5 does not have SetList method.
2. TDataValidation in unit BIFF_Validate5 does but cannot be added using ws.Validations.Add.
3. What is the purpose of the 3 types of source files starting with BIFF, XC12, XLS, and XPGP?
4. Is there any documentation describing this components?
Thank you for your help!
var
ws: TXLSWorksheet;
dv: TXlsDataValidation; //used to be TDataValidation which still have needed SetList method;
begin
dv := ws.Validations.Add;
dv.Areas.Add(0, cDataRowID + 1, 0, LastRow);
dv.ValidationType := x12dvtList;
dv.ValidationOperator := x12dvoBetween;
dv.ValidationStyle := x12dvesStop;
dv.SetList(['u', 'update', 'a', 'add', 'insert']);
dv.ErrorTitle := 'Invalid Action';
dv.ErrorMsg := 'Only values from the list can be used!';