PREGUNTAS CONTESTADAS - Delphi

- Asignar a Printer.Canvas.Font.Name el nombre de una fuente interna de la impresora que estas usando esto funciona en algunos casos, pero si bien es rápido no es eficaz.

- Otra manera es instalar el modelo genérico de impresora provisto por Windows, una vez hecho esto se debe seleccionar propiedades del nuevo dispositivo y allí incluir las secuencias que el modelo de impresora a usar requiera para imprimir en 10 cpi, 12 cpi, 17 cpi , doble ancho, subrayado etc.
En lo que respecta a la programación, se debe asignar a Printer.Canvas.Font.Name los nombres ´Roman 10cpi´, ´Roman 12cpi´, ´Roman 17cpi´, de acuerdo al tipo de fuentes que prefieras. En este caso debes obviar cualquier salida de tipo gráfico ya que este controlador no tiene esa capacidad.

Si las secuencias incluidas en el controlador de impresora genérica de Windows son los correctos para el modelo usado y la propiedad Printer.PrinterIndex coincide con el dispositivo genérico los resultados serán los mismos que los logrados bajo DOS.
En ambos casos puedes usar antes de la impresión los cuadros de diálogo tPrinterSetupDialog, o tPrintDialog para seleccionar el dispositivo y tFontDialog para seleccionar las fuentes, este último debe tener su propiedad Device = fdprinter para que muestre fuentes del dispositivo seleccionado.

Yo personalmente prefiero incluir las dos formas de impresión, usando True Type y con dispositivo genérico.

var
f:TextFile;
begin
AssignFile(f´,´LPT1´);
Rewrite(f);
WriteLn(f,´Texto a Imprimir´);
CloseFile(f);
end;

1. Utiliza el InstallShield, no lo tienes, viene en el CD del DELPHI, el te genera un instalador y crea el Alias automaticamente.

2. Otra, es que en tu aplicacion, preguntes por el path donde se deben leer las Tablas la primera vez que lo ejecuten o un sitio para configurar, y ese valor lo guardes en el registry de windows, .INI o donde desees y lo tomes de alli, en el momento de abrir las Tablas.

Nota : Recuerda que debes copiar el DBE (Data base engine) porque si no no te funciona.

Familia (x) tiene (n) productos asociados y estos asu vez (m) partes. Las familias están realcionados con los productos por medio de otra tabla que hace el puente entre los registros. Esto genera niveles indeterminados de anidamiento.

Cómo hago una búsqueda recursiva con Tquery o Ttable, de tal manera que al encontrar el código relacionado lo envié como parámetro de búsqueda en la misma tabla, y de esta manera pueda encontrar las relaciones anidadas?

Otra es que en el TTable, usa la propiedad MasterSource, ahi le das la tabla que de la que debe buscar, y en MasterFields. Recuerda que esta es una relacion de Hijo a Padre, no al reves. No es como Clipper, si lo conoces, en pocas palabras es algo como asi :

En el TTable de familia no hagas nada
en TProductos pon en MasterSource TFamilia
en TPartes pon TProductos

no olvides llenar MasterFields, ahi se selecciona el indice a usar, y los campos que se deben conectar o por los cuales se debe hacer la relacion.

Espero te haya servido de algo !

Me gustaría que alguien me contase su experiencia.
Muchas Gracias
http://members.xoom.com/jonysoft
http://www.come.to/manuales

Mi problema con Apollo fue el siguiente:
- Primero, viene en un DLL y no un PAS con un ejecutable.
- Segundo, su soporte consiste en gente que no es muy confiable. Explico:

Mi equipo en mi anterior trabajo constaba de gente muy eficiente en Delphi. En una ocasion, encontramos un error que solo ocurria cuando la plataforma era NT. Nos dijeron que no era cierto y que ellos lo probaron y funciono perfecto. En el siguiente release, el error habia desaparecido.

Cosas similares nos ocurrieron como tres o cuatro veces antes de decidir que Successware nunca iba a admitir que tenian un bug en su "motor". Corroboramos este hecho con otras compañias que tenian problemas similares y fueron tratados de la misma manera.

Tal vez hoy dia sea el caso sea diferente, pero hasta donde yo se, solo el nombre de la compañia cambio, no el management.

Obviamente es tu decision, pero considera a su competencia: Halcyon (antes "ssFiles"). Halcyon esta totalmente escrito en Pascal y lo puedes comprar con fuentes; sirve con Turbo Pascal Y Delphi tambien. El producto no es perfecto, pero los programadores una y otra vez nos trataron con respeto, dandonos respuestas rapidas e incluso diciendonos donde cambiar codigo en sus fuentes para corregir errores en particular "en lo que lo componen".

Ademas, como halcyon no es un DLL, tu puedes hacer aplicaciones con DBF en un solo ejecutable. El unico problema que encontre (que a lo mejor ya lo compusieron) es que como era una implementacion por separado del engine, utilizaba sus propios DBedits,etc., y no era compatible con los dbEdit que vienen con Borland.
Pero revisalo. Su site es http://www.grifsolu.com

- David Martinez
http://members.home.net/dmartinez/bienvenido.html

Procedure TForm1.Estructura;
Var
x : integer;
Raiz : TTreeNode;
Begin
With DbComboBox1 Do
Begin
Raiz := TreeView1.Items.Add (TreeView1.Selected,´Todos´);
For x := 0 To Items.Count-1 Do
Begin
TreeView1.Items.AddChild (Raiz,Items[x]);
end;
TreeView1.FullExpand;
End;
TreeView1.Selected := Raiz;
StatusBar1.Panels[0].Text := ´Tema:Todos´;
End;

Cuando creo una ventana y pulso los arrows me crean el evento, luego si creo otra tambien, pero luego si vuelvo al primero creado al pulsar un arrow ya no crea el evento.
Sin embargo si pulso teclas centrales del teclado nunca tengo problemas. El problema es que con los arrows siempre no crea el evento pero con las teclas centrales sí.
Bueno amigos si podeis ayudarme os lo agradeceria
Un saludo