İyi Çalışmalar dilerim

bu doc'taki gibi TCLUnit kullanarak sonrasında CallerForm.clShow kullanarak anaform'a dönebilirsin.

 //tanımlama kısımında

Unitplant:TclUnit

void SaveandBack;

{

  try

    Clomosy.DBSQLiteQuery.SQL.Text =

      'INSERT INTO users(username, userpassword) VALUES(' +

      QuotedStr(usernameedit.Text) + ',' +

      QuotedStr(userpasswordedit.Text) + ')';

      

    Clomosy.DBSQLiteQuery.OpenOrExecute;

    ShowMessage('Kayıt Başarılı.');

    Unitplant.UnitName='UPlant';

    Unitplant.CallerForm=RegisterForm;

    Unitplant.Run;

  except

    ShowMessage('Kayıt sırasında hata oluştu: ' + LastExceptionMessage);

}

//aşağıda

 Unitplant=TclUnit.Create;

İyi çalışmalar dilerim

 Clomosy.RunUnit('AnaKod');

// Clomosy.RunUnit('main');

}