Когда вы вызываете контекстное меню на иконке "Моего компьютера" и щёлкаете на команде "Свойства" - вы видите свойства системы. Эта статья позволит вам внести туда любой свой собственный текст и даже поместить рисунок!
Для начала давайте заглянем в папку System, находящуюся в директории Windows и найдём там файл инициализации с именем Oeminfo.ini, нужно его отредактировать так, чтобы он выглядел следующим образом: [General] Manufacturer="Производитель M$" Model="Модель, чёта, типа, 9x"
Здесь, как видно, должно быть всего два раздела: [General] Указанные здесь данные будут отображаться в окне "Свойства: Система" на закладке "Общие". [Support Information] Информация о поддержки, которая будет видна в диалоговом окне появляющимся по нажатию на кнопке "Поддержка..." на той же закладке.
В разделе [General] есть два параметра (Manufacturer и Model), которым можно задавать любые значения.
В разделе же информации о поддержки можно создать сколько угодно параметров.
Чтобы было ещё эффектнее можно поместить в окно свойств системы даже графический файл, для этого файл нужно сначала создать, используя любой графический редактор, учитывая главное условие - размер файла должен быть 127х127. Назвать файл нужно так: Oemlogo.bmp, а затем поместить в папку System, находящуюся в директории Windows.
Ну, а как же занести информацию в ini-файл программно?
Для взаимодействия с ini-файлами нужно сделать следующее: Сначала в области uses нужно объявить модуль inifiles Затем объявить переменную класса TIniFile Выделить память под этот объект, т.е. создать его с помощью метода Create А после уже можно заносить или считывать данные из этого ini-файла
Вид модуля должен быть примерно таким: unit Unit1; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, inifiles; {Объявляем модуль для взаимодействия с ini-файлами} type TForm1 = class(TForm) procedure FormCreate(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.DFM}
{по созданию окна пишем следующий код} procedure TForm1.FormCreate(Sender: TObject); var APChar: array [0..254] of char; {сначала нужно узнать где у пользователя папка Windows - объявляем под это дело массив символов} sFile: string; {объявляем текстовую переменную под имя ini-файла} Ini: TIniFile; {и экземпляр класса TIniFile для взаимодействия с файлами инициализации} begin GetWindowsDirectory(APChar, 255); {узнаём, где у чудилки находится каталог Windows} sFile := string(APChar) + 'SystemOeminfo.ini'; {в текстовую переменную помещаем имя нужного нам файла} if FileExists(sFile) then {и если файл существует...} begin Ini := TIniFile.Create(sFile); {связываем объявленную переменную с этим файлом} {далее заносим данные, используя процедуру WriteString, т.к. данные текстового типа. Параметры у процедуры такие: Имя раздела, Имя ключа, Вносимое значение}
Иногда необходимо запретить пользователям использовать некоторые символы при наборе текста в браузерах. Как это можно сделать:01. С помощью файла .htaccessRewriteEngine onRewriteBase /RewriteCond %{QUERY_STRING} ^.*('|"|<|>|%22|%3C|%3E).*$RewriteRule .*…
Еще ребенком я часто слышала от бабушки: «Алкоголь - погибель человечества». Тогда я не придавала этому значения, но всегда помнила. Еще бабушка говорили: «Да где когда-то так пили». Теперь же забавы…
История американского бизнеса -- это история деловых скандалов. В ряде случаев мошенники, представлявшиеся бизнесменами, демонстрировали невероятную фантазию и талант. Многие специалисты считают, что аферы в…
Холодильник, пожалуй, основное оборудование, которое обязательно должно быть в каждом доме. Трудно представить себе жизнь без холодильника. Выбор правильного холодильника в наш дом создает реальные трудности…
Книжку «Здоровье из аптеки, дарованной нам Господом Богом» госпожи Марии Трэбэн, купила по совету одной знакомой уже несколько лет назад. Проблема была в том, что моя дочь долгое время страдала аллергией и многое не…
БлаватскаяПокрывало, которое скрывает лицо будущего, соткано руками Милосердия.vє Бульвер-Литтон С НОВЫМ ГОДОМ ВСЕХ! Сказать это, кажется, довольно легко, и каждый ожидает таких поздравлений. И все же смогут ли…
Раны распятого Иисуса, неожиданно появляющиеся на телах простых людей, - загадка, уже много столетий волнующая умы. Что это: знак избранности Богом или насмешка Дьявола? Такие раны называются стигматами. Во времена…
Как мы знаем, на свете нет ничего вечного. Поэтому, когда вы сталкиваетесь с такой ситуацией, когда насосная станция включается чтобы набрать давление в накопительном баке, а давление не увеличивается, одной из причин…
Вы любите своего ребенка и не хотите, допустить ему какой-либо вред. Вам необходимо заботиться о его безопасности. Вы должны быть его глазами, когда вы выходите с ним на прогулку, ходите по магазинам или отводите его…
ЛАДАСлавянское имя, означающее: милая, жена. Принципиальны и упрямы, но неглубоки. Болезненные в детстве, заласканные родителями, они вырастают капризными и самоуверенными "дамами". Любят обратить на себя внимание то…