Save method
|
Save method
|
|
| IESnifferAutoFillUserInfo component.
|
| procedure Save;
|
| The Save method saves the values of Fields structure to the registry (or INI-file), to the registry keys specified in RegistrySaver structure.
|
| procedure TAutoFillFrm.ButtonsPanel1ApplySettings(Sender: TObject);
|
| begin
|
| with IESnifferAutoFillUserInfo1, Fields do
|
| begin
|
| FullName := EName.Text;
|
| Email := EEMail.Text;
|
| Company := ECompany.Text;
|
| JobTitle := EJobTitle.Text;
|
| Phone := EPhone.Text;
|
| Fax := EFax.Text;
|
|
|
| AddressLine1 := ELine1.Text;
|
| AddressLine2 := ELine2.Text;
|
| City := ECity.Text;
|
| State := EState.Text;
|
| ZIPCode := EZIP.Text;
|
| Country := ECountry.Text;
|
|
|
| Save;
|
| end;
|
| end;
|
| Fields and RegistrySaver structures;
|
| IESniffer component.
|