Delphi : impression en niveaux de gris seulement !

Ce forum est pour toutes les questions de NiceLabel pour les utilisateurs français.

Moderators: Georges, milos, NiceLabel Support Team

Post Reply
CyrilM
Newcomer
Posts: 4
Joined: Thu Apr 19, 2012 4:17 pm

Delphi : impression en niveaux de gris seulement !

Post by CyrilM » Thu Apr 19, 2012 4:36 pm

Bonjour, j'utilise l'API de NiceLabel Pro 5 pour pouvoir exporter en PDF une prévisualisation de mon étiquette
Après avoir ouver le fichier .LBL avec LabelOpenEx j'arrive à afficher l'étiquette en couleur avec GetLabelPreview mais en exécutant le code suivant pour imprimer l'étiquette en PDF (y'a t'il un moyen interne dans l'API pour générer un fichier PDF de l'étiquette ?) l'impression ressort systématiquement en niveaux de gris. J'ai essayé également de donner le PrinterName d'une imprimante en couleur et le résultat est le même !

Merci d'avance pour votre aide.

Code: Select all

var
	Success: boolean;
	RecId: integer;
	PName: string;
begin
	RecId := 0;
	if LabelInterface <> nil then begin
		PName := LabelInterface.PrinterName;
		LabelInterface.PrinterName := 'PDFCreator';
		PName := LabelInterface.PrinterName;

		RecId := LabelInterface.Databases.Item(2).SelectedRecordCount;
		RecId := LabelInterface.Databases.Item(2).SelectRecords(Self.Handle);
		Success := LabelInterface.Print('1');
		if (not Success) then
			ShowMessage('Erreur d''impression :(')
		else
			ShowMessage('Impression OK :)');
	end;
end;

Miso
NiceLabel
NiceLabel
Posts: 332
Joined: Tue Oct 24, 2006 6:12 pm
Location: Kranj, Slovenia
Contact:

Re: Delphi : impression en niveaux de gris seulement !

Post by Miso » Fri Apr 20, 2012 9:41 am

Answered in the international topic.
Regards,
Miso

Post Reply