Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   Evitar el cambio TPageControl (https://www.clubdelphi.com/foros/showthread.php?t=96038)

Jose Roman 08-01-2023 00:44:21

Evitar el cambio TPageControl
 
Hola a todos,

Trabajo con Delphi RIO, tengo un componente TPageControl, el cual tiene varias paginas, la primera pagina por ejemplo es un formulario donde el usuario ingresa datos a una base de datos MySql, lo que deseo es que no pueda cambiar de Tab al darle clic el usuario cuando este esta en modo de edicion, lo trato de hacer en el evento ChangePage pero hace primero me muestra el Tab al que dio clic el usuario y no deseo que se vea el nuevo tab hasta que el Dataset este en dsBrowse.

Gracias.

escafandra 08-01-2023 01:59:49

Código Delphi [-]
procedure TForm1.PageControlChanging(Sender: TObject; var AllowChange: Boolean);
begin
  AllowChange:= CheckBox1.Checked;
end;


Saludos.


La franja horaria es GMT +2. Ahora son las 20:41:20.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi