Buen día a todos.
Esperando se encuentren bien, iré directo al punto.
Estoy teniendo problemas para mostrar un mensaje personalizado que estoy necesitando y vamos directo al código.
Esto es lo que al final quiero mostrar
Código Delphi
[-]
Application.MessageBox('Usted no tiene acceso al permiso CACON - Cambiar Contraseña.'+ #13+ 'Favor contactar al Administrador del Sistema',
'Acceso Denegado',MB_ICONERROR );
La palabra en rojo "CACON - Cambiar Contraseña" viene de dos campos de la base de datos tal como se muestra en el siguiente código:
Código Delphi
[-]
ShowMessage(form_tablas.Query_Usuarios_permisos.FieldByName('Codigo').AsString + ' - '+form_tablas.Query_Usuarios_permisos.FieldByName('Descripcion').asstring);
Application.MessageBox('Usted no tiene acceso al permiso CACON - Cambiar Contraseña.'+ #13+ 'Favor contactar al Administrador del Sistema',
'Acceso Denegado',MB_ICONERROR );
Lo que no he podido hacer es agregar esos campos al mensaje de application.messagebox.
y de todas las maneras que pongo me muestra este mensaje:
[Error] principal.pas(180): Incompatible types: 'String' and 'PAnsiChar'
[Fatal Error] SGPA.dpr(61): Could not compile used unit 'principal.pas'
Podrían darme una mano
Gracias de antemano por su acostumbrada colaboración.
Saludos