Автор Тема: Ищу людей которым нравится Delphi  (Прочитано 32027 раз)

0 Пользователей и 1 Гость просматривают эту тему.

b2

  • Гость
Ищу людей которым нравится Delphi
« : 17 Апреля 2006, 00:12:06 »
Ищу людей которым нравится паскаль, людей которые пишут или учатся писать на паскале, в том числе и в дельфи.
Собственно все.
Если что пишите сюда
b2@topmail.kz
буду рад пообщаться с единомышленниками.

@le][

  • Гость
Re: Ищу людей которым нравится Delphi
« Ответ #1 : 06 Июня 2006, 10:41:12 »
Я и не поклонник Delphi ,но на нем тоже делают выкрутасы...............

malirdo

  • Гость
Re: Ищу людей которым нравится Delphi
« Ответ #2 : 15 Июля 2006, 22:16:59 »
Мне очень нравится делфи .. ,он очень подходит для начинающих ,когда на нем делал даже вирусы...

ClasSiC

  • Гость
Re: Ищу людей которым нравится Delphi
« Ответ #3 : 24 Ноября 2006, 09:37:38 »
Помогите пожалуйста с квадратным уравнением на DELPHI!/
Выложите пожалуйста исходник: ax2(квадрат)+bx+c=0 ???

ClasSiC

  • Гость
Re: Ищу людей которым нравится Delphi
« Ответ #4 : 25 Ноября 2006, 23:59:13 »
Помогите пожалуйста с квадратным уравнением на DELPHI!/
Выложите пожалуйста исходник: ax2(квадрат)+bx+c=0 ???


Всем СПС!.Я его сделал!.Вот Код Кому будет интересно!!!
unit SqRoot_;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, OleCtrls;

type
  TForm1 = class(TForm)
    Edit1: TEdit;
    Edit2: TEdit;
    Edit3: TEdit;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    Label4: TLabel;
    Button1: TButton;
    Label5: TLabel;
    Button2: TButton;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

// решает квадратное уравнение
procedure SqRoot( a,b,c : real; var x1, x2 : real; var ok : boolean);
    { a,b,c - коэффициенты уравнения
      x1,x2 - корни уравнения
      ok = True  - решение есть
      ok = False - решения нет }
    var
        d : real; // дискриминант
    begin
        d:= Sqr( b ) - 4*a*c;
        if d < 0
             then
               ok := False  // уравнение не имеет решения
        else
            begin
                ok := True;
                x1 := (-b + Sqrt(d)) / (2*a);
                x2 := ( b + Sqrt(d)) / (2*a);
            end;
    end;
{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
   k1,k2: real;  // корни уравнения
   rez: boolean; // True - решение есть, False - решения нет
   mes: string;  // сообщение
begin
   SqRoot(StrToFloat(Edit1.Text), StrToFloat(Edit2.Text),
                     StrToFloat(Edit3.Text), k1,k2,rez);
   if rez then
       mes := 'Корни уравнения' + #13 +
                 'x1='+FloatToStrF(k1,ffGeneral,4,2)+#13+
                 'x2='+FloatToStrF(k2,ffGeneral,4,2)+#13
   else
       mes := 'Уравнение не имеет решения';

   label5.Caption := mes;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
          winhelp(Form1.Handle,'sqroot.hlp',HELP_CONTEXT,1);
end;

end.

Пользуйтесь на здоровье!!!

Axel

  • Гость
Re: Ищу людей которым нравится Delphi
« Ответ #5 : 31 Января 2007, 21:35:49 »
Мне тоже нравится Delphi, но заодно я хотел бы задать вопрос бывалым - как с помощью кода узнать общий объём видеопамяти на компьютере, а? Ну ОЧЕНЬ нужно!  ???

informatik

  • Специалист
  • *
  • Оффлайн Оффлайн
  • Сообщений: 550
  • Общая оценка: 2
  • Пол: Мужской
  • Почти я:)
Re: Ищу людей которым нравится Delphi
« Ответ #6 : 30 Января 2008, 14:02:45 »
Приветствую! Дельфи хорошая программа, но я ее не обожаю... Так программирую...
-------------------------------------------------------------------------------------------------
Pascal- Rulez!!!!!!!!!!!!!
 (;?)
Все знать невозможно. Возможно знать многое.

Fox_KZ™

  • Модератор раздела
  • Лидер форума
  • ***
  • Оффлайн Оффлайн
  • Сообщений: 1212
  • Общая оценка: 27
  • Пол: Мужской
Re: Ищу людей которым нравится Delphi
« Ответ #7 : 05 Февраля 2008, 02:57:13 »
Мне тоже нравится Delphi, но заодно я хотел бы задать вопрос бывалым - как с помощью кода узнать общий объём видеопамяти на компьютере, а? Ну ОЧЕНЬ нужно!  ???
У тебя какая версия делфи???

Smith

  • Мастер класс
  • **
  • Оффлайн Оффлайн
  • Сообщений: 1094
  • Общая оценка: 8
  • Пол: Мужской
  • Алматы
Re: Ищу людей которым нравится Delphi
« Ответ #8 : 05 Февраля 2008, 11:53:06 »
Мужики! На Python пишите, а то бывает нужна какая-либо прога на линух, а её нету...

PS: сорри за оффтоп, сразу не прочёл название топика...
GI-8120; Supral 60 см; 56'

informatik

  • Специалист
  • *
  • Оффлайн Оффлайн
  • Сообщений: 550
  • Общая оценка: 2
  • Пол: Мужской
  • Почти я:)
Re: Ищу людей которым нравится Delphi
« Ответ #9 : 05 Февраля 2008, 13:28:47 »
Мужики! На Python пишите, а то бывает нужна какая-либо прога на линух, а её нету...

PS: сорри за оффтоп, сразу не прочёл название топика...
Дельфи для Linux 2007= Kylix;
Питон? С++ и точка...
Все знать невозможно. Возможно знать многое.

kms

  • Специалист
  • *
  • Оффлайн Оффлайн
  • Сообщений: 788
  • Общая оценка: 0
  • Пол: Мужской
Re: Ищу людей которым нравится Delphi
« Ответ #10 : 05 Февраля 2008, 14:21:46 »
Дельфи для Linux 2007= Kylix;
Kylix, Kylix  (13/) ааа, это тот. Не ужели кто про него помнит :) Даром не нужен.

Smith

  • Мастер класс
  • **
  • Оффлайн Оффлайн
  • Сообщений: 1094
  • Общая оценка: 8
  • Пол: Мужской
  • Алматы
Re: Ищу людей которым нравится Delphi
« Ответ #11 : 05 Февраля 2008, 14:51:04 »
что то и вправду informatik устаревшие языки предлагает: паскаль, kylix...

Питон? С++ и точка...
А на счёт c++. это да... согласен..
GI-8120; Supral 60 см; 56'

kms

  • Специалист
  • *
  • Оффлайн Оффлайн
  • Сообщений: 788
  • Общая оценка: 0
  • Пол: Мужской

informatik

  • Специалист
  • *
  • Оффлайн Оффлайн
  • Сообщений: 550
  • Общая оценка: 2
  • Пол: Мужской
  • Почти я:)
Re: Ищу людей которым нравится Delphi
« Ответ #13 : 06 Февраля 2008, 12:52:59 »
Дельфи для Linux 2007= Kylix;
Kylix, Kylix  (13/) ааа, это тот. Не ужели кто про него помнит :) Даром не нужен.

А может и дельфи не нужна:-)
Все знать невозможно. Возможно знать многое.

kms

  • Специалист
  • *
  • Оффлайн Оффлайн
  • Сообщений: 788
  • Общая оценка: 0
  • Пол: Мужской
Re: Ищу людей которым нравится Delphi
« Ответ #14 : 06 Февраля 2008, 13:40:00 »
А может и дельфи не нужна:-)
Ну ты же сам говоришь - "С++ и точка"  (,.)
А если серьезно, Kylix давно уже не обновляется и не поддерживается Borland'ом (кстати Kylix совсем не борландовская разработка а создана вроде кем то из "наших"), да и насколько я слышал реализовано там все через wine, лучше уж теже виндовские проги запускать через wine, по крайней мере он то уж чуть ли не каждую неделю обновляется.

ermek82

  • Гость
Re: Ищу людей которым нравится Delphi
« Ответ #15 : 14 Марта 2008, 08:20:50 »
Фак по делфи
Большой фак (delphi-bigfaq.rar)
http://depositfiles.com/files/4108140
Большой фак (delphi-faq-1.0.rar)
http://depositfiles.com/files/4108150
WIN API (WIN API.rar)
http://depositfiles.com/files/4108153

informatik

  • Специалист
  • *
  • Оффлайн Оффлайн
  • Сообщений: 550
  • Общая оценка: 2
  • Пол: Мужской
  • Почти я:)
Re: Ищу людей которым нравится Delphi
« Ответ #16 : 31 Марта 2008, 13:51:19 »
Приветствую!
Прям как в рекламе(перефразировано)... "Не любишь Дельфи? Ты просто не умеешь в ней программировать"


Цитировать
Замечание пользователю informatik. No offtop please!!!
« Последнее редактирование: 31 Марта 2008, 19:36:33 от 777 »
Все знать невозможно. Возможно знать многое.

Петр Гердт

  • Гость
Re: Ищу людей которым нравится Delphi
« Ответ #17 : 15 Ноября 2010, 22:39:23 »
 Здрасте всем! Слышал что на Delphi можно писать драйвера. Подскажите, где про это можно почитать по подробнее. Кстати есть интересная ссылка: www.delphiworld.narod.ru .Там очень много исходников.

lix

  • Гость
  • Оффлайн Оффлайн
  • Сообщений: 1
  • Общая оценка: 0
  • lix.kz
Re: Ищу людей которым нравится Delphi
« Ответ #18 : 25 Декабря 2015, 12:30:54 »
Приглашаю всех на тематический форум программистов Казахстана http://lix.kz

Aigyul

  • Посетитель
  • Оффлайн Оффлайн
  • Сообщений: 5
  • Общая оценка: 0
Re: Ищу людей которым нравится Delphi
« Ответ #19 : 09 Января 2016, 22:41:42 »
Слышал что на Delphi можно писать драйвера. Подскажите, где про это можно почитать по подробнее.
Мне кажется, его уже никто не использует в прикладных целях... Так для баловства, может только.