Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Buscar en los Foros
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Mostrando resultados del 26 al 50 de 500
La búsqueda tomó 0,05 segundos; generada hace 44 minuto(s).
Buscar: Mensajes Hechos Por: ecfisa
Foro: SQL 13-12-2021
Respuestas: 7
Visitas: 1.355
Escrito Por ecfisa
Hola. Entonces sólo agrega los demás campos al...

Hola.

Entonces sólo agrega los demás campos al código que publiqué inicialmente (1).

var
j: Integer;
begin
FDQuery.Close;
FDQuery.SQL.Text := 'SELECT COUNT(*) AS CONT FROM detalle_venta';
...
Foro: SQL 13-12-2021
Respuestas: 7
Visitas: 1.355
Escrito Por ecfisa
Hola. No tienes por que disculparte, pero si no...

Hola.

No tienes por que disculparte, pero si no es un listado no entiendo que es lo que pretendes hacer sobre el StringGrid.

Saludos :)
Foro: SQL 12-12-2021
Respuestas: 7
Visitas: 1.355
Escrito Por ecfisa
Hola. Creo que buscas algo así: ... var j:...

Hola.

Creo que buscas algo así:

...
var
j: Integer;
begin
FDQuery.Close;
FDQuery.SQL.Text := 'SELECT COUNT(*) AS CONT FROM detalle_venta';
Foro: Varios 06-12-2021
Respuestas: 11
Visitas: 2.046
Escrito Por ecfisa
Hola. No sé que solución encontraste pero otra...

Hola.

No sé que solución encontraste pero otra opción que probé con TDBGrid y funciona ante el evento OnCellClick es:

procedure TForm1.DBGrid1CellClick(Column: TColumn);
begin
...
Foro: Varios 06-12-2021
Respuestas: 11
Visitas: 2.046
Escrito Por ecfisa
Hola de nuevo. No siendo un componente estandar...

Hola de nuevo.

No siendo un componente estandar no sé si funcione, pero por las dudas, intenta:

type
TDBGridEx = class(TCRDBGrid);
...


Saludos :)
Foro: Varios 06-12-2021
Respuestas: 11
Visitas: 2.046
Escrito Por ecfisa
Hola. ¿ La clase del grid no es TDBGrid...

Hola.

¿ La clase del grid no es TDBGrid (https://docwiki.embarcadero.com/Libraries/Sydney/en/Vcl.DBGrids.TDBGrid) ?

Saludos :)

Edito: veo que es un componente de Devart...
Foro: Varios 06-12-2021
Respuestas: 11
Visitas: 2.046
Escrito Por ecfisa
Hola. Intenta también con lo siguiente en el...

Hola.

Intenta también con lo siguiente en el evento OnCellClick:

type
TDBGridEx = class(TDbGrid);

procedure TForm1.DBGrid1CellClick(Column: TColumn);
begin
DBGrid1.EditorMode := True;
Foro: Varios 18-11-2021
Respuestas: 5
Visitas: 1.220
Escrito Por ecfisa
Hola. Un código de ejemplo: // Activar...

Hola.

Un código de ejemplo:

// Activar multiselección en el DBGrid
procedure TForm1.FormCreate(Sender: TObject);
begin
DBGrid1.Options := DBGrid1.Options + [dgMultiSelect];
end;
Foro: Varios 07-11-2021
Respuestas: 12
Visitas: 3.789
Escrito Por ecfisa
^\||/ Saludos :)

^\||/

Saludos :)
Foro: Varios 25-10-2021
Respuestas: 12
Visitas: 3.789
Escrito Por ecfisa
Hola. No parece haber ningún error allí, solo...

Hola.

No parece haber ningún error allí, solo por si acaso... ¿ Controlas el valor del índice del combo ?

begin
if CBImpresora.ItemIndex = -1 then // <-
Exit;
...
Foro: Varios 25-10-2021
Respuestas: 12
Visitas: 3.789
Escrito Por ecfisa
Hola. ¿ Cuál es el evento en que seleccionas la...

Hola.

¿ Cuál es el evento en que seleccionas la impresora y como es el código mediante el cuál le indicas la impresora a QR ?

Saludos :)
Foro: SQL 18-10-2021
Respuestas: 2
Visitas: 1.106
Escrito Por ecfisa
Hola. Otra opción similar es almacenar...

Hola.

Otra opción similar es almacenar nombre_usuario como la cadena, y el id_usuario como entero aprovechando la función AddObject de TStrings.

...
...
Foro: OOP 10-10-2021
Respuestas: 7
Visitas: 3.660
Escrito Por ecfisa
Hola. Podrías hacer: ... var bt:...

Hola.

Podrías hacer:

...
var
bt: TBitBtn;
begin
OtroForm := TOtroForm.Create(Self);
OtroForm.Show;
Foro: FireMonkey 06-09-2021
Respuestas: 16
Visitas: 11.097
Escrito Por ecfisa
¡ Excelente ! ^\||/

¡ Excelente ! ^\||/
Foro: Varios 17-08-2021
Respuestas: 12
Visitas: 3.789
Escrito Por ecfisa
Hola. Para cargar las impresoras en un...

Hola.

Para cargar las impresoras en un ComboBox:

uses Printers;

procedure TForm1.FormCreate(Sender: TObject);
begin
ComboBox1.Items := Printer.Printers;
ComboBox1.ItemIndex := 0;
Foro: SQL 13-08-2021
Respuestas: 2
Visitas: 937
Escrito Por ecfisa
Hola. Según te entiendo creo que sería: SELECT ...

Hola.

Según te entiendo creo que sería:

SELECT
TIPO,
TOTAL,
UNO,
DOS,
IIF( UNO > 0, TOTAL * 0.03, 0 ) AS PERC_3,
Foro: Firebird e Interbase 09-08-2021
Respuestas: 6
Visitas: 5.048
Escrito Por ecfisa
Hola. ¿ Ya has probado el ejemplo de la página...

Hola.

¿ Ya has probado el ejemplo de la página de Embarcadero ? : Executing SQL Scripts (FireDAC) (http://docwiki.embarcadero.com/RADStudio/Sydney/en/Executing_SQL_Scripts_(FireDAC))

Saludos :)
Foro: OOP 20-07-2021
Respuestas: 3
Visitas: 1.204
Escrito Por ecfisa
Hola. Se trata de desproteger la clase...

Hola.

Se trata de desproteger la clase TStringGrid para acceder a los métodos protegidos, por ejemplo:


...
interface

uses ..., Grids;
Foro: SQL 17-07-2021
Respuestas: 4
Visitas: 6.217
Escrito Por ecfisa
Hola. Lo que mencionas no es un error, es una...

Hola.

Lo que mencionas no es un error, es una advertencia que te aconseja usar la función CharInSet y no pareciera tener que ver con el problema que mencionas. ¿ No aparece ningún mensaje de error...
Foro: FireMonkey 15-07-2021
Respuestas: 7
Visitas: 1.816
Escrito Por ecfisa
Hola. Podes agregar una columna a tu tabla que...

Hola.

Podes agregar una columna a tu tabla que sirva para saber si la fila debe ser pintada o no.

Un ejemplo muy simplificado:

...
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const...
Foro: OOP 08-07-2021
Respuestas: 11
Visitas: 3.627
Escrito Por ecfisa
Hola. Para cargar una imágen .PNG en un...

Hola.

Para cargar una imágen .PNG en un TImageList en tiempo de ejecución, revisa en este enlace: Invalid image size en ImageList (http://www.clubdelphi.com/foros/showthread.php?t=90894)

Saludos :)
Foro: FireMonkey 08-07-2021
Respuestas: 7
Visitas: 1.816
Escrito Por ecfisa
Hola. Agrega DB a uses: uses ...,...

Hola.


Agrega DB a uses:

uses ..., DB;



Saludos :)
Foro: Internet 23-06-2021
Respuestas: 3
Visitas: 1.681
Escrito Por ecfisa
Hola. Gracias por compartir la solución....

Hola.

Gracias por compartir la solución. ^\||/

Saludos :)
Foro: OOP 23-06-2021
Respuestas: 4
Visitas: 1.434
Escrito Por ecfisa
Hola. Creo que un código mas aproximado a lo que...

Hola.

Creo que un código mas aproximado a lo que buscas podría ser:

procedure TForm1.sbBtnDownClick(Sender: TObject);
begin
if SG.TopRow > SG.FixedRows then
SG.TopRow := SG.TopRow - 1
else
...
Foro: OOP 23-06-2021
Respuestas: 4
Visitas: 1.434
Escrito Por ecfisa
Hola. Creo que te resultará mas simple manejar...

Hola.

Creo que te resultará mas simple manejar el scroll controlando la propiedad TopRow del TStringGrid.

Ejemplo:

procedure TForm1.FormCreate(Sender: TObject);
var
c, r: Integer;
begin
Mostrando resultados del 26 al 50 de 500

 
Saltar a Foro

La franja horaria es GMT +2. Ahora son las 03:18:28.


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