| Главная | | Вход | | Регистрация | | Приветствую вас Гость | Ваш профайл | Выход |
[ Новые сообщения · Участники · FAQ · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Модератор форума: Dark_Elf  
Форум » Персональный » Наука и Познание » Программирование. ("Было у отца три сына. Два нормальных и один программист"...)
Программирование.
Dark_ElfДата: Суббота, 24.01.2009, 17:04 | Сообщение # 1
Коренной Житель
Группа: Модераторы
Сообщений: 45
Статус: Offline
Обсуждение всего, что связано с программированием.

Всё, что нас не убивает - делает нас сильнее.
(с) Фридрих Ницше.
 
NirvanaДата: Четверг, 29.01.2009, 12:09 | Сообщение # 2
Коренной Житель
Группа: Житель Города
Сообщений: 40
Статус: Offline
Ну где вопросы??? Что вам рассказать?

Всем сюда - http://strunino.my1.ru/
Лучший сайт города Струнино.


Сообщение отредактировал Nirvana - Пятница, 30.01.2009, 16:18
 
Dark_ElfДата: Четверг, 29.01.2009, 16:11 | Сообщение # 3
Коренной Житель
Группа: Модераторы
Сообщений: 45
Статус: Offline
Я попросил бы вас выражаться более грамотно, по крайней мере на моём форуме. В частности советую изменить стилистику и соблюдать правила орфографии.

Всё, что нас не убивает - делает нас сильнее.
(с) Фридрих Ницше.
 
NirvanaДата: Пятница, 30.01.2009, 16:19 | Сообщение # 4
Коренной Житель
Группа: Житель Города
Сообщений: 40
Статус: Offline
Ну всё, всё... исправила я свою ошибку... dry

Всем сюда - http://strunino.my1.ru/
Лучший сайт города Струнино.
 
AndyredДата: Пятница, 30.01.2009, 16:50 | Сообщение # 5
Хороший Человек
Группа: Модераторы
Сообщений: 115
Статус: Offline
Nirvana, чтобы так всегда и было (на сайте и во всех разделах форума в особенности)!

У каждого свой ад
 
AndyredДата: Понедельник, 02.02.2009, 21:07 | Сообщение # 6
Хороший Человек
Группа: Модераторы
Сообщений: 115
Статус: Offline
(Курсор мыши перемещается по экрану монитора с периодом в 10 секунд (Для тех кто не в курсе: исходник для языка программирования - Delphi)).
Удаляешь все из юнита и вписываешь туды это:

unit Unit1;
interface

uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TForm1 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
end;
var
Msg: TMsg;
OK: boolean;
Form1: TForm1;
implementation

{$R *.dfm}
BEGIN
begin
OK:=false;
repeat
randomize;
setcursorpos(random(Screen.Width-1),random(Screen.Height-1));
sleep (10000);
until OK;
end;
while GetMessage (Msg, HInstance, 0, 0) do
begin
TranslateMessage(msg);
DispatchMessage(msg);
end;

end.


У каждого свой ад
 
Dark_ElfДата: Вторник, 03.02.2009, 01:41 | Сообщение # 7
Коренной Житель
Группа: Модераторы
Сообщений: 45
Статус: Offline
Quote (Andyred)
Для тех кто не в курсе: исходник для языка программирования - Delphi

Те, кто "не в курсе", будут весьма озадачены такими терминами, как "юнит" и "исходник". И вообще, врядли станут читать данную тему.


Всё, что нас не убивает - делает нас сильнее.
(с) Фридрих Ницше.
 
AndyredДата: Вторник, 03.02.2009, 19:03 | Сообщение # 8
Хороший Человек
Группа: Модераторы
Сообщений: 115
Статус: Offline
Dark_Elf, твоя правда..... dry

У каждого свой ад
 
Форум » Персональный » Наука и Познание » Программирование. ("Было у отца три сына. Два нормальных и один программист"...)
  • Страница 1 из 1
  • 1
Поиск:

Copyright MyCorp © 2020
Сделать бесплатный сайт с uCoz