Jump to content
Fórum Script Brasil

junior103

Membros
  • Content Count

    29
  • Joined

  • Last visited

Community Reputation

0 Neutro

About junior103

  1. Primeiramente obrigado pelo retorno. Você tem ideia de como fazer isso Listbox.TopIndex := 2; no Delphi FMX? Esse trecho é do Delphi VCL e preciso usar no FMX.
  2. Olá. No VCL o listBox tem a propriedade TopIndex, e no FMX qual seria ? Desde já agradeço.
  3. junior103

    Insert tabela EF

    Saudações. Estou querendo inserir dados usando EF muitos para muitos. Tenho as seguintes tabelas. namespace WebServerDeliveryADR.Models { [Table("vendas", Schema = "public")] public class Vendas { [Key] [Column("id_vendas")] public int IdVendas { get; set; } public DateTime DataHoraVenda { get; set; } public int StatusVenda { get; set; } public virtual Lojas Loja { get; set; } public virtual Clientes Clientes { get; set; } public virtual ICollection<ItensPedidos> ItensPedidos { get; set; } } } publi
  4. Solução android e ios https://stackoverflow.com/questions/27020930/how-to-get-application-idpackage-modulename-delphi-xe5-xe6-xe7
  5. Boa trde. Eu preciso do nome da Aplicativo compilado pra android. Tem algum exemplo de como. Estou usando delphi berlin
  6. Bom dia . Como faço para obter o nome da minha aplicação pelo delphi berlin firemonkey?
  7. Link da solução http://www.activedelphi.com.br/forum/viewtopic.php?p=488447#488447 Obrigado pela ajuda. A solução que desejava esta no link que postei.
  8. Não estou conseguindo. Estou usando: Delphi berlin. Projeto criado em "Multi-Device application". (Se fosse em VCl os exemplo passado funciona normal, mas em Multi-Device application que estou tendo dificuldades).
  9. Bom dia. Nesse link funciona em VCL mas em FMX não funciona.
  10. Esse exemplo são uteis para quem precise trabalhar com fastReport. Mas no meu caso não deu certo ainda. Preciso Migrar de vcl para fmx o seguinte trecho Printer.PrinterIndex := -1; For I := 0 to Printer.printers.Count-1 do begin If LowerCase(Printer.Printers[i]) = Lowercase(PrinterName) then begin //Altera a classe printer padrão if ( Printer.PrinterIndex <> i ) then begin Printer.PrinterIndex := i; end;
  11. Esse exemplo são uteis para quem precise trabalhar com fastReport. Mas no meu caso não deu certo ainda. Preciso Migrar de vcl para fmx o seguinte trecho Printer.PrinterIndex := -1; For I := 0 to Printer.printers.Count-1 do begin If LowerCase(Printer.Printers[i]) = Lowercase(PrinterName) then begin //Altera a classe printer padrão if ( Printer.PrinterIndex <> i ) then begin Printer.PrinterIndex := i; end;
  12. Primeiramente obrigado pelo retorno. Esse exemplo não serve pra mim. Referente o fonte Printer.PrinterIndex := -1; For I := 0 to Printer.printers.Count-1 do begin If LowerCase(Printer.Printers[i]) = Lowercase(PrinterName) then begin //Altera a classe printer padrão if ( Printer.PrinterIndex <> i ) then begin Printer.PrinterIndex := i; end; //Altera a classe printer do FastReport frxPrinters.FillPrinters; frxPrinters.PrinterIndex := frxPrinters.Printers.IndexOf(PrinterName); exit; en
  13. Bom dia. Em VCL com essa rotina seta outra impressora passando o nome como parâmetros. Printer.PrinterIndex := -1; For I := 0 to Printer.printers.Count-1 do begin If LowerCase(Printer.Printers[i]) = Lowercase(PrinterName) then begin //Altera a classe printer padrão if ( Printer.PrinterIndex <> i ) then begin Printer.PrinterIndex := i; end; //Altera a classe printer do FastReport frxPrinters.FillPrinters; frxPrinters.PrinterIndex := frxPrinters.Printers.IndexOf(PrinterName); exit; end; End;
  14. Não, me manda um exemplo por favor. Fiz o seguinte e funcionou. Segue o código: Código: Printer.ActivePrinter.SelectDPI(1200, 1200); Printer.Title:= 'Documento do Sistema'; Printer.Canvas.Fill.Kind := TBrushKind.Solid; Printer.BeginDoc; DestRect := TRectF.Create(0, 0, Printer.PageWidth, Printer.PageHeight); Printer.Canvas.Font.Size:= 80; Printer.Canvas.FillText(DestRect,Lista.GetText,True,1,textFill,align,align); Printer.EndDoc; Resposta dada no Forum Activedelphi 28/07/2017
  15. Boa tarde. Obrigado pelo retorno. Esse exemplo funciona no VCL e eu preciso que rode em FMX. Você teria alguma ideia como?
×
×
  • Create New...