Конфликт двух TImage.

[grater83]

использую drag&drop. В image1 загружается иконка как сделать ,чтобы в image 2 загружалась другая иконка из другого файла и не исчезала первая?(если бросаю другой файл, то иконка загружается так же в image 1)

[Олвин]

Переписать код правильно =)
Пока вопрос остаётся настолько неточным, ответить не представляется возможным.
Код в студию, как говорит Stilet.

[.Phoenix]

использую drag&drop. В image1 загружается иконка как сделать ,чтобы в image 2 загружалась другая иконка из другого файла и не исчезала первая?(если бросаю другой файл, то иконка загружается так же в image 1)

1. Ты используешь Drag&Drop
2. В Image1 загружается одна иконка, а в Image2 загружается 2-ая иконка.
3. Так зачем тебе Drag&Drop?
Нужно прописать код при щелчке для переноса мышью изображения из Image1 в Image2.

[grater83]

procedure TForm1.WMDropFiles(var Message: TMessage);
var
i: TLinkInfo;
begin
Image1.Picture.Icon.ReleaseHandle;
Image1.Picture.Icon.Handle := GetTargetIconHandle(i.ClsID, False, False);
часть кода.
надо дрпустим кинуть 5 файлов поочередию Кидаем1-ый он загружается в Image1.Вопрос как кинуть 2-ой ,чтобы он загрузился в image2,но при этом иконка1-ого была видна!? Спасибо заранее.

[Stilet]

grater83

А у меня вопрос в ответ: А не хочешь ли ты поменять Image на более пригодный для такого ListView? Ато ты тут однозначно не в ту степь пошел.
Можно конечно и с TIMage, но тогда придется как минимум знать координаты, в которые можно отрисовывать на канве так чтоб другие иконки не загораживались.

[grater83]

если можно не большой пример

можно ли сделать так если есть иконка в image1 то загружать в image2 и т.д.?

[Stilet]

если можно не большой пример

Можно. Чеж нет?
Прикладываю архивом.
Запустишь прогу и таскай на нее файлы - все сам увидишь.

[grater83]

спасибо большое

подскажите пожалуста как загрузить эти брошенные иконки при следующем старте программы. полный путь к ним я сохраняю в файл,а при старте читаю из файла. как реализовать загрузку по пути?

[Kotofff]

подскажите пожалуста как загрузить эти брошенные иконки при следующем старте программы

Попробуй так :

Image1.Picture.LoadFromFile('Твой путь\Твой файл.jpg')

[grater83]

это я знаю . может как то в imagelist можно