Criando imagens em Runtime apartir de um diretório

Delphi

30/07/2016

Fala Pessoal, tudo bem!

Sou novo no delphi e estou com um problema aqui... com certeza é bem fácil pra vcs que entendem melhor do assunto.
eu tenho uma pasta no pc onde eu salvo vários arquivos, dentro delas existe outras subpastas, vou dar um exemplo pratico.

Pasta: Musicas
Subpasta 1: Sertanejas
Subpasta 2: Rock
...

Eu usei o código simples de verificação do diretório, porem quando eu criasse a imagem queria que verificasse a posição da imagem (para não ficar uma imagem em cima da outra e sim uma ao lado da outra) e também o nome da pasta, exemplo (Rock) para inserir numa Label.

codigo de verificação da pasta

if not DirectoryExists('C:\Users\...\Musicas') then
begin
ShowMessage('Pasta não encontrada');
end
Else
begin
// começa a criar a imagem e a Label
end;

criar os componentes eu sei, minha duvida é como saber se já existe uma imagem numa determinada posição, exemplo (top =10 e left = 25) para eu criar a outra imagem do lado caso já exista.... e como não copiar a mesma subpasta duas vezes.

para resumir, a minha ideia seria assim

(1º Subpasta = imagem1+label1 na posição top=10 e left=25)
(2º Subpasta = imagem2+label2 na posição top=10 e left=80)

assim sucessivamente até terminar a quantidade de subpastas
Rafael Panizza

Rafael Panizza

Curtidas 0
POSTAR