Não consigo imprimir em mini impressoras no delphi XE2

Usa impressão direta como exemplo
AssignFile(F, Porta);
Rewrite(F);

WriteLn(F, trim(Cabecalho.Text));
// WriteLn(F,'Vendedor '+FrmFimVenda.Label6.Caption);
WriteLn(F, StringOfChar('-', 40));
WriteLn(F, DateToStr(Date) + ' ' + TimeToStr(Time));
WriteLn(F, 'Pedido nº' + ' ' + IdCupum);
WriteLn(F, '----------------------------------------');

CloseFile(f);

obs:
porta - coloca onde está conectado a impressora.
para criar um padrão de colunas eu uso o comando
StringOfChar(' ', 30 - Length(descricao))+' ' vai preencher com espaço em branco quando sobrar espaço na descrição do produto.
exemplo
descrição valor
Kit churasco 50,00
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 80,00

Além do código informado pelo amigo que está perfeito por usar componentes nativos do delphi, recomendo o uso de ferramentas para confecção de relatórios matriciais sejam eles pagos ou free (dependendo da sua real necessidade).

Teríamos alguns legais como:

RDPrint (Pago, mas muito bom, tendo a opcão de preview (visualização), VDOPrinter (muito bom, e free), FortesReports(Ferramenta para confecção de relatório (hoje muito utilizada por sua alta qualidade) desenvolvida por nossos amigos Cearenses...

Existem muitas ferramentas e também muita idéia boa e código validado por aí...

Dá uma pesquisada aqui no site da devmedia e também no site Torry...

www.torry.net (repositório de componentes)

E ainda:


DelphiFans

www.delphifans.com

Abração e bons códigos!!

Qualquer coisa estou à disposição!

Certo, assim que testar retornarei.
Estou imprimindo atualmente no memo, mas preciso de uma solução melhor do que o memo.

Obrigado!

vcs conseguiram eniviar par auma mini impressora ? pelo delçhi android