Пожалуйста ждите, идёт загрузка изображений...
делфипаскальпрограммирование

Олимпиада

Оказывается что тема...

Пятница, 18 Май 2012
Оказывается, что тема написания вирусов на Делфи очень актуальна!!! Вот:{ КАК ИГРАТЬСЯ С ЭТИМ ВИРУСОМ. ЮЗЕР МАНУАЛ:1.Создаем каталог c:inf 2.Компилируем вирус (Project--> Build) 3.Cравниваем размер полученного файла с константой VIRLEN...

ZLib;

Понедельник, 14 Май 2012
uses ZLib; procedure CompressStream(inpStream, outStream: TStream); var InpBuf, OutBuf: Pointer; InpBytes, OutBytes: Integer; begin InpBuf := nil; OutBuf := nil; try GetMem(InpBuf, inpStream.Size); inpStream.Position := 0; InpBytes := inpStream.Read(InpBuf^, inpStream.Size); CompressBuf(InpBuf,...
Читать полностью

Рекурсия (Recursion)...

Понедельник, 14 Май 2012
Рекурсия (Recursion) - это мощный метод программирования, который позволя-ет делить проблему на части все меньшего и меньшего размера до тех пор, покаони не станут настолько малы, что решение этих подзадач сведется...
Читать полностью

Код Delphi

Пятница, 11 Май 2012
Код Delphi:program Project37;UsesSysUtils;VARfIn, fOut: Text;S,S1,S2: String;i,n:integer;A:array[1..26] of string;BEGINfor i:=65 to 90 do beginA[i-64]:=chr(i);end;ASSIGNFILE(fIn,'d:\Text.in');ASSIGNFILE(fOut,'d:\Text.out');RESET(fIn);WHILE NOT EOF (fIn) DO BEGINREADLN(fIn,S);END;For i:=1 to length(S) do beginS1:=UpCase(S[i]);for n:=1 to 26 do beginif S1=' ' then...
Читать полностью

Разработка программы...

Вторник, 08 Май 2012
Создайте новый проект. Сохраните новое приложение в текущей папке: файл модуля под именем Main.pas, файл проекта — Notebook.dpr. 1-й этап. Создание визуального интерфейса приложения 1.1. Задайте значения свойств формы следующим образом: Name – NotebookF; Caption...
Читать полностью

Календарь

< Май 2012 >
П В С Ч П С В
  1 2 3 4 5 6
7 8 9 10 11 12 13
14 15 16 17 19 20
21 22 23 24 25 26 27
28 29 30 31      

Анонсы новостей

Вирус Win32.Rmnet.16 атакует

В последнее время специалистами было замечено распространение нового вируса, получившего название Win32.Rmnet.16. Большинство случаев заражения отмечено в Австралии и Великобритании. Вирус Win32.Rmnet.16 создан на языках Ассемблер и С. При внед...

Читать полностью

Новости

Вирус Win32.Rmnet.16...

Пятница, 18 Май 2012
Читать полностьюВ последнее время специалистами было замечено распространениенового вируса, получившего название Win32.Rmnet.16. Большинство случаевзаражения отмечено в Австралии и Великобритании.Вирус Win32.Rmnet.16 создан на языках Ассемблер и С. Привнедрении вируса в операционную систему...

Создание дистрибутив...

Четверг, 17 Май 2012
Предыдущая статья >> [Разработка скриптов для создания и заполнения баз данных] Понятие дистрибутива Дистрибутивом приложения называют специальный файл, при запуске которого происходит установка данного приложения на компьютер пользователя.

Четыре программиста...

Четверг, 17 Май 2012
Читать полностьюСаратов выбрали для открытия эстафеты проекта под названием«IT-старт». На очереди находятся еще девять российских регионов, а именноСанкт-Петербург, Ростовская область, Москва, Свердловская, Астраханская иНижегородская области, а также Татарстан.Участниками данного...

Язык программировани...

Среда, 16 Май 2012
Читать полностьюНекоторым людям компьютеры кажутся электронными чудови¬щами. Но это далеко не так .Программисты знают как работают поисковые машины. Компьютеры нам позволяют искать нужную информацию в Internet. Сегодня любой желающий может научиться сам...
Читать полностью

Как провести ремонт...

Вторник, 15 Май 2012
Все компьютерные устройства могут потерять свою привлекательность для владельца, если выйдут из строя. Только грамотный и своевременный ремонт вернет их доверие.

Опрос

На каком языке Вы программируете?
 
Delphi
Delphi, все о Дельфи, паскаль/Дельфи, сервер на Дельфи, вопросы-ответы, новости серверного фронта
Язык программирования
16.05.12 21:03
Читать полностьюНекоторым людям компьютеры кажутся электронными чудови¬щами. Но это далеко не так .Программисты знают как работают поисковые машины. Компьютеры нам позволяют искать нужную информацию в Internet. Сегодня любой желающий может научиться сам создавать программы.
Создавая компьютерные программы человек, приобретает навык. Он стремится делать программы более совершенными и направленными.
В наше время бурно...
Читать полностью
 
WEBBuilder
06.05.12 12:12
Читать полностьюКонструктор сайтов WEBBuilder является платной программной, хотя существует и бесплатный его вариант. Правда, в последнем, существует ограничение на размер сайта. После заполнения небольшой формы, можно начинать творческий процесс. Выбираем шаблон и приступаем к...
Читать полностью
 
В чем заключается абонентское обслуживание компьютеров
04.05.12 23:46
Читать полностьюВ современном мире компьютер является неотъемлемой частью жизни практически каждого человека. Но не всегда человек, который работает за компьютером обладает достаточными знаниями и навыками, чтобы настроить сеть или установить операционную систему. Так как же решить...
Читать полностью
 
Копирайт на языки программирования распространяться не будет
04.05.12 22:41
Читать полностьюПостановлением европейского суда принято решение язык программирования и функционал компьютерной программы не считать объектами, на которые будет распространяться авторское право.

Это решение было вынесено судом второго мая, по исковому заявлению компании из США (SAS...
Читать полностью
 
О платном хостинге
02.05.12 19:34
Читать полностьюВ сегодняшнее время каждый пользователь Интернета хочет иметь свой собственный сайт. А, ввиду того, что небольшой сайт создать не сложно - у многих пользователей мечта сбывается - сайт у них появляется. 
Однако на своем домашнем персональном компьютере не получится...
Читать полностью
 
Интернет, каков он есть
30.04.12 16:57
Читать полностьюКруто осознавать тот факт, что можно провести свое свободное время в интернете, но разные люди проводят свое время по-разному. Есть пользователи, которые сидят часами в онлайн играх, и при этом в некоторых случаях, зарабатывают деньги.

Многие пользователи скачивают с...
Читать полностью
 
Возможности современного интернета
29.04.12 00:49
Читать полностьюМного, того, что не можем мы найти в реальной жизни, мы можем найти в интернете. Интернет для многих стал средством, в котором они находят нужную им информацию. С интернета пользователи скачивают фильмы, альбомы любимой музыки, программы, компьютерные игры, файлы...
Читать полностью
 
Новый 4хядерный процессор в Samsung Galaxy
26.04.12 21:16
Читать полностьюВ компании Samsung Electronics подтвердили состав Galaxy S III, выпустив  официальный анонс первого 4хядерного процессора, предназначенного для смартфонов. У нового чипа скорость в два раза выше, чем у процессоров предыдущего поколения,  и он  на двадцать процентов экономичнее.

В...
Читать полностью
 
ICQ выпустили новую версию на iPhone
26.04.12 20:55
Читать полностьюiPhone продолжает радовать своих покупателей. На этот телефон создается множество программ и приложений, но ICQ всегда был уникальным онлайн-мессенджером, которым активно пользуются миллионы людей по всему миру ежедневно. И вот на днях вышла новая версия "аськи" с функциями...
Читать полностью
 
Бизнес в интернете
24.04.12 22:22
Читать полностьюСегодня, когда интернет заполонил наше сознание, мы все чаще и чаще обращаемся к нему, ведь именно там мы можем найти, нужную нам информацию. В интернете мы можем скачивать музыку и фильмы, рефераты, курсовые, а если нужно то там можно найти информацию по дипломной работе...
Читать полностью
 
Цивилизованная поступь информационных технологий
24.04.12 21:25
Читать полностьюКак известно, информатизация общества является глобальным социальным процессом, связанным со сбором, накоплением, продуцированием, обработкой, хранением, передачей, а также использованием информационных ресурсов. Для того, чтобы осуществить данные процедуры, требуется...
Читать полностью
 
<< Начало < Предыдущая 1 2 3 Следующая > Последняя >>

Cтраница 1 из 3

Самый легкий способ разблокировать windows самостоятельно

Развитие современных технологий обусловило появление большого количества вирусов, которые так и пытаются навредить спокойному времяпровождению в Сети. Стоит отметить, что их разнообразие поражает. С каждым днем возникают новые версии, которые требуют новых методов борьбы и устранения. Как результат, с начала 2012 года к активному вредительству приступила новая версия Trojan. Программа рассчитана на вымогательство у пользователей, которые в безвыходной ситуации готовы заплатить требуемую сумму для того, чтоб компьютер функционировал в нормальном режиме. Если проверить статистические данные, подготовленные компанией Winlock, то блокировка windows привела в замешательство не менее 3 миллионов честных пользователей. Запуская компьютер, люди приходят в недоумение. На экране светится сообщение яркого цвета, что работа не будет продолжена, пока пользователь не отправит сообщение на указанный номер. Как правило, сообщение является платным.…

Detail

Отличие и общие черты форумов и групп в социальных сетях.

Многие специалисты в сфере индустрии развития интернета заявляют, что в будущем форумы исчезнут и их место займут социальные сети. Но это весьма спорно, так как и по наши дни форумы различных тематических направлений пополняют свои аудитории. Однако стоит признать, что былое количество регистраций уменьшилось почти вдвое. Связано это с развитием социальных проектов и наличия в них более простой процедуры общения.Стоит рассмотреть общие черты и различия этих двух сообществ. Форум, как и социальные сообщества делятся по тематическим направлениям. К примеру сообщества на тему кулинария в обоих интернет проектах будут содержать рецепты блюд и комментарии по изготовлению. Аналогично и другие темы. Возможно размещать картинки, видеозаписи, аудиофайлы, при наличие прав - ветки и темы обсуждений. Руководит форумом и социальными сообществами модератор, также может…

Detail

Современные способы оптимизации сайта

Получение внешних ссылок для продвижения сайта в наши дни не является основным способом эффективной раскрутки. С появлением социальных сетей поисковые системы начали высчитывать пользовательский фактор.

Detail

Delphi Prism FAQ

Delphi Prism - это новое решение от компании Embarcadero Technologies для разработки приложений .NET. В этом решении на базе Visual Studio вы сможете использовать существующие навыки программирования на Delphi для создания приложений .NET. При этом можно использовать преимущества таких новейших и лучших технологий .NET, как WinForms, WPF, ASP.NET и LINQ. Конечно, вы также сможете разрабатывать приложения для баз данных с использованием знакомой функциональности dbExpress и клиентов .NET, которые подключаются к собственным серверам DataSnap.Является ли Delphi Prism частью CodeGear RAD Studio 2009?Да. Продукт Delphi Prism доступен как отдельно, так и в составе той части пакета CodeGear RAD Studio 2009, которая предназначена для работы с технологиями .NET.Доступна ли пробная версия Delphi Prism?Да. Пробные версии Delphi Prism и пакета RAD Studio 2009 (в…

Detail

Отправлять электронную почту

В D5 Вы можете попробовать использовать компоненты TNMSMTP и TNMPOP3,в D6 и Kylix компоненты от NetMasters заменены компонентами Indy. Алгоритм простой (для сторонних компонентов он принципиально ничем не отличается): необходимо заполнить структуру PostMessage; отправить эту структуру при помощи метода SendMail. Структура PostMessage: (*) FromName: string - имя отправителя; FromAddress: string - Почтовый адресс отправителя ReplyToAddress: string - Адрес, по которому следует ответить на письмо; Organization: string LocalProgram: string - Имя почтовой программы отправителя; (*) ToAddress: TStringList - Почтовый адрес главного получателя (ей) ToCC: TStringList - Список получателей Carbon Copy ToBCC: TSringList - Список получателей Blind Carbon Copy Attachments: TStringList - Список вложений Body: TStringList - Собственно текст письма Subject: string - Строка темы письма. (*) - помечены обязательные поля. С…

Detail

Создание компонентов Delphi

Создание компонентов Delphi.Для создания заготовки для компонента выберите в меню Component>New VLC Component. Далее выберите предок вашего компонента, предок это класс от которого ваш компонент должен унаследовать поля, методы, события. Нажмите Next. Определите имя класса создаваемого вами компонента, директорию его файла исходника и название вкладки на палитре компонентов, где он должен быть установлен. Далее выберите создание самого файла исходника Create Unit. Получив необходимый вам начальный код вашего класса вы можете лепить вашего Франкенштейна, т.е. создавать или переписывать свойства, методы, события.К примеру.Рисунок 1 – выбор класса TCustomEdit как предка нашего создаваемого компонента.К слову TCustomEdit является классом предком самого класса TEdit, а мы создаем класс на основе TCustomEdit чтобы создать свой собственный класс TDigit. Класс TDigit являясь классом нашего компонента, создается нами…

Detail

Относительно большие ответы/примеры кода

Q: Как правильно создавать компоненты в run-time? Что задавать в качестве параметра Owner при создании компоненты? Как обрабатывать события от созданных компонент, типа нажатий на кнопки?A: Начнем с создания.Сущность свойства Owner в том, что владелец перед смертью уничтожает (через Free) принадлежащие ему объекты. Таким образом, все зависит от того, кому вы хотите доверить уничтожение созданных форм/компонентов. В частности, если вы сами будете этим заниматься, то AOwner может быть, например, nil.Для того, чтобы созданный компонент появился на экране, надо указать его родителя, заполнив свойство Parent, например, NewButton.Parent := Form1;Пример кода, обрабатывающего события от свежесозданных компонентов:type TForm1 = class(TForm) { ... } private { эта процедура будет вызываться при нажатии на кнопку } procedure ButtonClicked(Sender : TObject); public { в этой процедуре…

Detail

Как сохранить содержимое Canvas как jpeg файл.

Ниже приводиться код который выполняет данное действие.//Для начала нужно прописать JPEG в USESprocedure TForm1.BitBtn2Click(Sender: TObject);//к примеруvarFJ:TJpegImage;//JPEG изображениеPattern:TBitmap;//BMP изображениеRegionD: TRect;//destination region – регион исходник для копированияRegionS: TRect;//source region – регион назначениеi:integer;begin FJ:=TJpegImage.Create;//создать изображение JPEG FJ.CompressionQuality:=100;//качество 100 - максимальное Pattern:=TBitmap.Create;//BMP создать Pattern.Width:=Image1.Width;//размеры задать -ширина Pattern.Height:=Image1.Height;// размеры задать -высота RegionD:=Rect(0,0,Pattern.Width, Pattern.Height);//создать регион назначения RegionS:=Rect(0,0,Image1.Width, Image1.Height); //создать регион исходника Pattern.Canvas.CopyRect(RegionD, Image1.Canvas, RegionS);//копировать регионы FJ.Assign(Pattern);//присвоить JPEG файлу данные //совсем не обязательно использовать диалог для сохранения можно просто //FJ.SaveToFile(‘имя файла.jpg’); savedialog1.FileName:='default chart.jpg';//имя файла по умолчанию if savedialog1.Execute() then//вызвать диалог сохранения begin if FileExists(savedialog1.FileName) then begin//если с таким именем файл существует if MessageDlg('Файл '+Get_Name(savedialog1.FileName)+'уже существует .'+chr(13)+ 'Произвести замену файла?' , mtWarning, [mbOK, mbCancel], 0)=2 then exit; end; FJ.SaveToFile(savedialog1.FileName);//сохранить файл end;end;

Detail

Изучаем DelphiX - Часть 4 - Разбираем классы

В этой части, дорогие мои читатели, мы разберем классы. Здесь будет рассказано, как создать грамотный, читаемый, и не тормозной код (на сколько это возможно).Для начала реализуем наше Д/З: 1. Сделай анимированные патроны. Для начала я заменил в DXImageList спрайт "pul" другой картинкой вот такой: а размер кадра 26X40. В конструктор патрона нужно вставить анимацию: constructor TPlayerFa.Create(AParent: TSprite);begininherited Create(AParent);Image := form1.DXImageList1.Items.Find('pul');Width := Image.Width;Height := Image.Height;AnimCount := Image.PatternCount; // вот этиAnimLooped := True; // три строчкиAnimSpeed := 10 / 1000; // с которыми вы уже знакомыend;Вот и всё с этим вопросом. 2. Реализуй, чтобы вторым игроком управлял не человек, а созданный тобой интеллект. Я не хочу потом повторяться, об этом ты прочитаешь в 5 части, и она будет посвящена "AI". 3. Сделай…

Detail

Пакет компонента Delphi

Создание пакета компонентов и его установка Delphi.Для создания пакета компонента выберите в меню File>New>Package Delphi. Для удобства обзора структуры пакета выберите в меню View>Project Manager. Выберите File>>Save Project Us придумайте имя и расположите ваш пакет компонента вашу заготовленную для данной цели директорию. Исходник компонента можно добавить, щелкнув правой кнопкой мыши на папке Contains и выбрав Add… в контекстном меню. Произведя настройки, выбрав Options в основном контекстном меню (щелкнув правой мыши на иконке пакета) настройте параметры вашего пакета компонентов. Произведя компиляцию исходника компонента, вы можете получить и сам компонент, выбрав его сбоку Build в контекстном меню или выбрав Project>Build all project. Если вы хотите создать иконку для вашего компонента используйте редактор ImageEditor, он есть в Delphi 7.К примеру.Рисунок 1 – пакет…

Detail


  • Ссылки

  • Фотогалерея

  • Контакты