Текущий архив: 2008.06.08;
Скачать: CL | DM;
Вниз
Обои Найти похожие ветки
← →
Manur (2007-06-14 16:37) [0]Здраствуйте.
У меня вот проблема
надыбал исходник процедуры меняющей обои
procedure ChangeActiveWallpaper(s:pwidechar);
begin ....
end;
procedure TForm1.Button2Click(Sender: TObject);
var
s1:string;
begin
s1:=FileListBox1.FileName;
ChangeActiveWallpaper(s1); <- вот тут то и начинается
end;
пробовал писать @s1, @s1[1] не помогает
что посоветуете ?
← →
grisme © (2007-06-14 17:56) [1]PChar(s)?
← →
Manur (2007-06-15 06:51) [2]это я уже пробовал делать
не совпадение типов
← →
grisme © (2007-06-15 08:49) [3]ну прямо таки PWideChar(s) попробуй :o)
Страницы: 1 вся ветка
Текущий архив: 2008.06.08;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.016 c
