Cómo implementar el siguiente código en una clase

[eennzzoo]

Hola, tengo este codigo [agrega datos de clientes a un archivo] y quisiera implementarle una clase para este codigo.

void __fastcall TAgregarCliente::menuNuevoClick(TObject *Sender)
{
	editNombre->Text="";
	editApellido->Text="";
        editDni->Text="";
}
void __fastcall TAgregarCliente::btnGuardarClick(TObject *Sender)
{
       TS1->LoadFromFile("datos.txt");
       if ((editNombre->Text != "")&&(editApellido->Text != "")&&(editDni->Text != "")){
		for(int i=0; i<TS1->Count; i=i+3) {
			if (TS1->Strings[i]==editDni->Text) {
				editNombre->Text = "";
				editApellido->Text = "";
                                editDni->Text="";
				Application->MessageBox(L"El cliente ya es socio.",L"AVISO", MB_OK | MB_ICONEXCLAMATION);
				break;
			}else if (i==(TS1->Count-3)){
					FILE *F1;
					char Nombre[30], Apellido[30], Dni[10];
					strcpy(Nombre, AnsiString(editNombre->Text).c_str());
					strcpy(Apellido, AnsiString(editApellido->Text).c_str());
                                        strcpy(Dni, AnsiString(editDni->Text).c_str());
                                        F1 = fopen("datos.txt", "a");
					if( FS1 == NULL ){
						ShowMessage("El archivo no se pudo guardar");
						return;
					}
					fprintf(F1, "%s\n", Dni);
					fprintf(F1, "%s\n", Nombre);
					fprintf(F1, "%s\n", Apellido);
					fclose(F1);
					editNombre->Text = "";
					editApellido->Text = "";
					editDni->Text = "";
					Application->MessageBox(L"Has agregado un nuevo cliente.",L"Nuevo cliente", MB_OK);
					}
				}
	   }else {
	   		Application->MessageBox(L"Completar todos los campos.",L"AVISO", MB_OK | MB_ICONEXCLAMATION);
		}
}

Gracias.