Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.11.25;
Скачать: CL | DM;

Вниз

Поменять обои рабочего стола   Найти похожие ветки 

 
allucard   (2007-05-15 11:52) [0]

ДОброго дня.

Есть код на С, помогите перевести:

#include "stdafx.h"
#include "windows.h"
#include "iostream.h"

void main()
{
char filename[10];
strcpy(filename,"1.bmp");
if (SystemParametersInfo(SPI_SETDESKWALLPAPER,0,
 &filename,SPIF_SENDWININICHANGE)==TRUE)
{
 cout << "Ok change" << endl;
}
else
 cout << "Error change" << endl;
}


Вот моя не рабочая версия:

procedure TForm1.Button1Click(Sender: TObject);
var s: string;
begin
Label1.Caption := inttostr(GetDesktopWindow);
s:=  "C:\1.bmp";
if SystemParametersInfo(SPI_SETDESKWALLPAPER,0, @s, SPIF_SENDWININICHANGE)
 then ShowMessage("Ok")
   else ShowMessage("Error");
end;


Спасибо.


 
clickmaker ©   (2007-05-15 12:09) [1]

Pchar(s) или @s[1]


 
allucard   (2007-05-15 12:25) [2]

Спасиб.
А что это значит?

Как я полагаю в Windows другая кодировка.

Но что на самом деле произойдёт с этим стрингом?


 
clickmaker ©   (2007-05-15 12:38) [3]

причем тут кодировка Windows? просто адрес строки


 
allucard   (2007-05-15 12:45) [4]

угу



Страницы: 1 вся ветка

Текущий архив: 2007.11.25;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.024 c
1-1188727240
Al500
2007-09-02 14:00
2007.11.25
TPanel - прорисовка


3-1183922494
IMHO
2007-07-08 23:21
2007.11.25
Zeos


2-1194260362
ProgRAMmer Dimonych
2007-11-05 13:59
2007.11.25
TMemoryStream (ограничения)


2-1194014087
Kolan
2007-11-02 17:34
2007.11.25
Логика работы программы, которая что-то делает по расписанию.


2-1193745723
Washington
2007-10-30 15:02
2007.11.25
Шрифт в ListBox е