Форум Игромании - Delphi/Делфи

Форум Игромании (http://forum.igromania.ru/index.php)

- Программирование (http://forum.igromania.ru/forumdisplay.php?f=243)

- - Delphi/Делфи (http://forum.igromania.ru/showthread.php?t=111292)

Delphi/Делфи

Delphi/ Делфи

http://funkyimg.com/u2/375/970/cover3d_dh20101.png

Официальная страница

Полная статья на Википедии

Delphi – это удивительный язык программирования, - это безграничные возможности, сотни компонентов, тысячи функций и открытых исходников. Вот почему даже самые продвинутые гуру не знают все о Delphi. На первый взгляд, кажется, что Delphi не одолеть? Выбросите эту мысль из головы – на то Вы и пришли в Интернет, чтобы учиться. Поверьте, delphi скоро станет для Вас настоящим другом и незаменимым помощником.

Пример.

Скрытый текст:

Крупнейшие информационные сайты и сообщества изучающих Delphi.

▪ КОРОЛЕВСТВО Дельфи | Виртуальный клуб программистов
▪ Delphi Sources — Программирование на Delphi, более 800 примеров, статьи, форум, FAQ
▪ Мастера DELPHI
▪ Delphi Plus — новости, посвященные Delphi
▪ Torry’s Delphi Pages — крупнейший сборник компонент для Delphi
▪ DRKB — Русская база знаний по Delphi
▪ DRKB — Статьи по Delphi

а что это в шапке картиночка 7-ой IDE? На дворе 2010 год как бы.

Цитата:

Сообщение от Ost1n_ud (Сообщение 8136976)

Официальная страница

Вот официальная страница

и ссылка в вики вот эта
http://ru.wikipedia.org/wiki/Delphi_...D0%B8%D1%8F%29

А как насчет авто запуска дисков игромании? На какой платформе сделаны они?И вопше как такое сделать?

Drobot, судя по всему, стандартный DirectX. Какой-то модуль в духе DelphiX. Ничего особо сложного.

Здравствуйте. Такая задача. Даны к примеру три числа (1,2,3) нужно написать программку, которая создает максимально возможное число комбинаций из этих чисел, к примеру 123, 122,331 и т.д. То есть не просто перестановки но и с повторяющимися числами. вот написал но что-то не то, посоветуйте, кто что знает.

Код:

var

 a: array[1..3] of integer;

 b: array[1..3] of real;

 z: array[1..9] of integer;

 i,k:integer;

 begin

 for i:=1 to 3 do

 if a[i]<a[i+1]  then

  begin

  z[k]:=a[i];

 end;

 write(z[i],'');

 end.

Стронглав,

Код:

var dig: array [0..2] of integer; {массив цифорок}

i: integer;

begin

for i:=0 to 26 do                     {число полученных элементов - n^m, n - число возможных цифр, m - их количество в числе}

    begin

    write(dig[i div 9]);              

    write(dig[(i+9) mod 9 div 3]);

    writeln(dig[(i+3) mod 3];

    end;

end.

писал на сях, потом переделал под паскаль, поэтому возможно начудил в синтаксисе, но думаю суть ясна.

Стронглав, даны три числа или три цифры?)
в любом случае по-моему всё просто: делаем тройной вложенный цикл (по количеству чисел-цифр), в котором на каждую позицию ставим каждый элемент массива.
for i:=1 to 3 do
for j:=1 to 3 do
for k:=1 to 3 do begin write(dig[i],dig[j],dig[k]); writeln; end;
и все. можно ещё упростить при желании.

B@sil, по-моему в Делфи немножко не приветствуется стиль С и С++, я про нумерацию с нуля

Вопрос по компилятору. Можно ведь если условие булевское (переменная или функция), не писать =true? Tипа:
if function then

Такое ощущение, что меня из-за этого компьютер как-то не так понимает. Делфи 7-ка, если важно.

Цитата:

if function then

можно. И даже нужно, ибо =true - это лишнее действие, оно на доли секунды тормозит работу программы.
Возможно, проблема в том, что условие надо заключить в скобки. ПРиведите кусок кода)

Есть SQL-запрос, где qry7 - ADOQuery, cbb(1,2,3) - combobox

Код:

  qry7.Close;

  qry7.SQL.Clear;

  qry7.SQL.text:='insert into Zakaz (Klient, Sotrudnik, Forma oplati) values (:Klient, :Sotrudnik, :Forma oplati)';

  qry7.Parameters.ParamByName('Klient').Value:=cbb2.Text;

  qry7.Parameters.ParamByName('Sotrudnik').Value:=cbb1.Text;

  qry7.Parameters.ParamByName('Fprma oplati').Value:=cbb3.Text;

  qry7.Open;

Выходит ошибка

Цитата:

Incompatible types: 'TStrings' and 'string'

Как исправить - не могу сообразить. Вроде combobox.text должно возвращать текст выбранной строки, а ParamByName вообще пофиг, что в него вписывать.

Как исправить?

под рукой нет справочников, чтобы понять суть кода (с SQL общался только в С#), но просто судя по ошибке - автоматически string в TString не хочет преобразоваться, надо явно преобразовывать

1.как самостоятельно написать стандартные функции TrimLeft (удаляет из строки начальные пробелы и управляющие символы) ..
2. написать функцию для нахождения nго числа последовательности Фибоначчи

Build
[Fatal Error] Project1.dpr(6): Internal error: URW3950
вот возникает такая ошибка, когда копирую программу с нетбука на основной комп и наоборот.
Что это такое?
Заново переставлять дельфи или как?

Delphi — что это?

В последнее время резко возрос интерес к программированию. Это связано с развитием и внедрением в повседневную жизнь информационно-коммуникационных технологий. Если человек имеет дело с компьютером, то рано или поздно у него возникает желание, а иногда и необходимость, программировать.
Среди пользователей персональных компьютеров в настоящее время наиболее популярно семейство операционных систем Windows и, естественно, что тот, кто собирается программировать, стремится писать программы, которые будут работать в этих системах.
Несколько лет назад рядовому программисту оставалось только мечтать о создании собственных программ, работающих в среде Windows, т. к. единственным средством разработки был Borland C++ for Windows, явно ориентированный на профессионалов, обладающих серьезными знаниями и опытом.
Бурное развитие вычислительной техники, потребность в эффективных средствах разработки программного обеспечения привели к появлению систем программирования, ориентированных на так называемую "быструю разработку", среди которых можно выделить Borland Delphi и Microsoft Visual Basic. В основе систем быстрой разработки (RAD-систем, Rapid Application Development — среда быстрой разработки приложений) лежит технология визуального проектирования и событийного программирования, суть которой заключается в том, что среда разработки берет на себя большую часть рутинной работы, оставляя программисту работу по конструированию диалоговых окон и функций обработки событий. Производительность программиста при использовании RAD-систем -фантастическая!
Delphi — это среда быстрой разработки, в которой в качестве языка программирования используется язык Delphi. Язык Delphi — строго типизированный объектно-ориентированный язык, в основе которого лежит хорошо знакомый программистам Object Pascal.
В настоящее время программистам стала доступна очередная версия пакета Delphi - Borland Delphi 7 Studio. Как и предыдущие версии, Borland Delphi 7 Studio позволяет создавать самые различные программы: от простейших однооконных приложений до программ управления распределенными базами. В состав пакета включены разнообразные утилиты, обеспечивающие работу с базами данных, XML-документами, создание справочной системы, решение других задач. Отличительной особенностью седьмой версии является поддержка технологии .NET.
Borland Delphi 7 Studio может работать в среде операционных систем от Windows 98 до Windows XP. Особых требований, по современным меркам, к ресурсам компьютера пакет не предъявляет: процессор должен быть типа Pentium или Celeron с тактовой частотой не ниже 166 МГц (рекомендуется Pentium II 400 МГц), оперативной памяти - 128 Мбайт (рекомендуется 256 Мбайт), достаточное количество свободного дискового пространства (для полной установки версии Enterprise необходимо приблизительно 475 Мбайт).

AutoAndroid, товарищ, ваша информация устарела лет эдак на 5. Delphi уже давненько и не Борланд Делфи вовсе, а очень даже CodeGear RAD Studio от Embarcadero Technologies, просто седьмая версия признана классической.

Цитата:

Сообщение от Enchantner (Сообщение 8631948)

Когда Embarcadero Technologies купила у Борланд CodeGear, он стал называться Embarcadero RAD Studio :) А с последней версии, её стоит называть Embarcadero RAD Studio XE :)

Как заполнить массив случайными числами типа +-real

Ваяю прости господи "игру для программистов". Та часть, которая отвечает за "игру" вроде бы работает, кроме одного бага, который решено считать фичей. Теперь собственно о "программировании". Это будет собственный скриптовый язык, примерно такого вида

Скрытый текст:

Хранится в обычном txt.

Я сейчас буду упорно курить всё, что есть в интернете о работе с текстами, но может не надо изобретать велосипед и где-то есть наводки, как это проще сделать?

Имеется функция. В случае, если вылезает какая-либо ошибка, нужно тупо сделать её равной нулю.

Код:

function Twarrior.initiate(source:Tstrings):integer;

var check:boolean;

begin

try

........

except

on e:exception do

result:=0;

end;

end;

Почему не делает, а выдает ошибку, едрить? Внутри этой функции используются другие функции и рекурсия. Может директива компилятора какая потерялась? Есть только {$R *.dfm}