Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Delphi Последовательное считывание дробных чисел из строки в переменую https://www.cyberforum.ru/ delphi-beginners/ thread940063.html
Добрый день! Подскажите, пожалуйста, способы считывания чисел типа "real" в такую же переменную последовательно из строки. В случае простого текстового файла заполненного числами можно применить прекрасную функцию Read(f, s);, где f - текстовый файл, s - переменная типа "real". Но если у меня переменная типа "TStringList" имеет такое наполнение, к примеру: Абракадабра 146.27 548.11 897.6...
Как получить полный путь до запускаемой программы Delphi
До запускаемой программы вместе с ее названием и расширением? Ну типа так: fullFileName := 'C:\Program Files\Borland\Delphi7\Projects\MyProgram.exe';
Delphi Не могу втавить в код переменную. Вобщем задача такая этот код добавляет программу в список разрешенных программ брандмауером, Если указывать путь напрямую как ниже то работает: WinExec('netsh advfirewall firewall add rule name="My Application" dir=in action=allow program="C:\Users\VASA\Documents\TEST\FTP_Akkaunt\Project1.exe" enable=yes', SW_Hide) Если , вобщем а как вставить переменную (в ней путь) за место вот этого... https://www.cyberforum.ru/ delphi-beginners/ thread940026.html Delphi String, char и CopyFile https://www.cyberforum.ru/ delphi-beginners/ thread939959.html
cn:string; cn:= GetSystemUserName; //ну тут все норм CopyFile('пурупум'+cn+'пурупум','пурупум',true); //а вот тут проблемка. Пременная cn типа string. А в CopyFile походу используется char. Можно как -нибудь перевести? (Гуглил, ничего не помогает). Делфя 7.
Delphi StringReplace заменить все слова в верхний регистр
Привет всем как быстро заменить все слова в верхний регистр с помощью stringreplace? есть на форме ричедит, и кнопка пытаюсь делать так richedit1.text:=stringreplace(richedit1.text,'А','а',); richedit1.text:=stringreplace(richedit1.text,'Б','б',); richedit1.text:=stringreplace(richedit1.text,'В','в',); richedit1.text:=stringreplace(richedit1.text,'Г','г',);...
Delphi Клиент сервер передача файлов https://www.cyberforum.ru/ delphi-beginners/ thread939909.html
Как реализовать передачу файлов между клиентом и сервером?
Delphi Повторение цикла For Вот столкнулся с проблеммой нужно повторить вот этот цикл бессконечно раз for i:=1 to 4 then begin ......... end https://www.cyberforum.ru/ delphi-beginners/ thread939820.html Delphi Задача с потоками (сохранение в JPG)
Реализовал потоки для сохранения в JPG - половина создаваемых кадров пусты (так и пишет "файл пуст"). А беспоточное сохранение - это висяк системы на несколько часов, а bmp фреймы очень тяжёлые (55 мб один фрейм). Помогите с потоками, пожалуйста.
Delphi Вычисления в ячейках StringGrid Здравствуйте! Помогите пожалуйста с возникшей проблемой. procedure TForm2.FormCreate(Sender: TObject); begin StringGrid1.Cells:='Ингредиент'; StringGrid1.Cells:='Кол. ингредиента'; https://www.cyberforum.ru/ delphi-beginners/ thread939798.html Delphi Консоль. Найдите ошибку ВООБЩЕМ ТАКАЯ ПРОБЛЕМА ПРИ X=1.4 ВЫДАЕТ Y=7.72, А ДОЛЖНО -6.67,НИКАК НЕ МОГУ ПОНЯТЬ В ЧЕМ ПРИЧИНА((( program Project3; {$APPTYPE CONSOLE} uses SysUtils; var b:integer; x,y:real; begin b:=2; https://www.cyberforum.ru/ delphi-beginners/ thread939780.html
Нужно редактировать программку Delphi
Всем привет. Ищу человечка который в силах помоч редактировать одну маленькую программку. Если есть таковые, пишите в личку или в скайп skotelya.
Delphi черный список или мини файервол https://www.cyberforum.ru/ delphi-beginners/ thread939727.html
привет всем: вопрос можно ли сделать мини файервол? пример есть форме edit1, listbox1, и кнопки. Добовляю определенный ip адрес через edit в listbox если в листбоксе будут некоторые ip адреса то они не будут иметь доступ к моему сетевому компьютеру, тоесть сетевому окружению, торрент раздачу, dc+ и.пт если удалить из листбокса определенный ip адрес то будет актывным... заранее спасибо!!!
Я не экстрасенс
382 / 339 / 34
Регистрация: 22.01.2013
Сообщений: 1,126
19.08.2013, 12:34 0

параметры процедуры по умолчанию - Delphi - Ответ 4963414

19.08.2013, 12:34. Показов 6889. Ответов 2
Метки (Все метки)

Ответ

Delphi
1
2
3
4
5
6
7
8
9
10
procedure TForm1.Button1Click(Sender: TObject);
begin
  MyProc(-1);
end;
 
procedure TForm1.MyProc(a : integer);
begin
  b := a ;   // b - глобальная переменная
  Edit1.Text:= IntToStr(b);
end;
или
Delphi
1
2
3
4
5
6
7
8
9
10
procedure TForm1.Button1Click(Sender: TObject);
begin
  MyProc();
end;
 
procedure TForm1.MyProc(a : integer= -1);
begin
  b := a ;   // b - глобальная переменная
  Edit1.Text:= IntToStr(b);
end;


Вернуться к обсуждению:
параметры процедуры по умолчанию Delphi
1
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
19.08.2013, 12:34
Готовые ответы и решения:

Алгоритмизация, процедуры, функции, параметры
вопрос 1. Что является значением переменной процедурного типа? 1.только подпрограммы, после...

Возвратить объект параметром процедуры/функции со значением по умолчанию
Привет всем. Появилась необходимость в проекте изменить функцию... и нужно вернуть еще 1...

Параметры по умолчанию в С.
Всем привет! Захотел воспользоватся параметрами по умолчанию в си-шном проекте. И получил следующие...

ODBC, параметры по умолчанию
Доброго утра! Хочу на ПК програмно прописывать источники ODBC. Пример абстрактного, работающего...

2
19.08.2013, 12:34
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
19.08.2013, 12:34
Помогаю со студенческими работами здесь

Параметры конструктора по умолчанию
Привет! Подскажите, что я делаю не так. Создал класс Monstr, как в книжке написано, вот исходники:...

Параметры вставки по умолчанию
Здравствуйте. Как настроить параметры вставки по умолчанию? Необходимо, чтобы всегда вставляло...

Параметры по умолчанию в функции
Всем привет. Есть такой класс: template <typename T> class MyClass { public: MyClass(T...

Параметры функции по умолчанию
Приветствую всех! Уважаемые эксперты С++, подскажите, значения параметров по умолчанию должны...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru