texto em imagem

Question

eu tenho um programa que gera thumbnail, eu gostaria se alguem me ajuda-se a criar um codigo que na hora que gero o thumb.. ele insira uma mensagem no canto da imagem..obrigado...

Nildo · Answer

Pesquise na internet sobre o Canvas.ficaria assim:SuaImagem.canvas.font.size := 8;SuaImagem.canvas.textOut(10,10,�Seu texto�)...

Tatooman · Answer

eu procurei na internet sobre o canvas,mas n�o achei nada expecifico eu achei um ex. eu gostaria de saber se vc pode me ajudar,

aqui ta o codigo que achei
Image1.Canvas.TextOut(50,50,�Exemplo�);

[b:75f1cc9c80]como fa�o para coloca-lo dentro do meu codigo?[/b:75f1cc9c80]

aqui ta o codigo que fa�o para abrir as imagens

var
i: Integer;
InFileName, OutFileName: string;
FilePath, FileName: string;
begin
for i:=0 to FilesListBox.Items.Count-1 do
begin
InFileName:=FilesListBox.Items[i];
FilePath:=ExtractFilePath(InFileName);
FileName:=ExtractFileName(InFileName);
if OutDirEdit.Text<>�� then
FilePath:=IncludeTrailingBackSlash(OutDirEdit.Text);
OutFileName:=Concat(FilePath,PrefixEdit.Text,FileName);
CreateThumbnail(InFileName,OutFileName,WidthUpDown.Position,
HeightUpDown.Position,Shape1.Brush.Color);
Application.ProcessMessages;
StatusBar1.SimpleText:=�Done �+IntToStr(i+1)+� of �+IntToStr(FilesListBox.Items.count);
end;

Tatooman · Answer

por favor me ajudem...

Marcelo Saviski · Answer

O que � um Thumbnail?   :)o que vc quer?pegar um arquivo de imagem e colocar um texto em algum lugar dele?...

Tatooman · Answer

eu tenho um programa que diminui as imagens, eu queria que na hora que dimiu as imagens ele coloca-se uma mensagem em baixo dela......

Cebikyn · Answer

Coloque o c�digo do nildo dentro da procedure CreateThumbnail. Qualquer d�vida coloque a procedure aqui pra gente dar uma olhada......

F�rum texto em imagem #181802