Фон формы

[Smith68]

ПОЛНОЕ Г! Не могу ни че сделать! Короче: на форме FileListBox, в котором отображаются файлы (картинки) определенной директории. Нужно, чтобы при нажатии кнопки менялся фон формы, взятый из FileListBox. Значит я пишу

Код: Выделить всё


Private Sub XpB1_Click()
File1.Path = "picture\"
FormWin1.Picture = "Picture\" & File1.FileName
End Sub


И не чета не прет!
Помогите, плиз!

[Kovu]

Осьпади
FormWin1.Picture =LoadPicture(FilePath)

[alibek]

Smith68, если бы ты нажал F2 и посмотрел тип свойства Picture у формы, вопрос бы не возник.

[Smith68]

Спасибо, но мне пришлось так:

Код: Выделить всё

FormWin1.Picture = LoadPicture("picture\" & File1.FileName)


По-другому никак!

[Kovu]

Smith68
Да будет тебе известно что FilePath в моем сообщении означало путь к файлу, а не конкретную надпись