|
|
| Другие темы раздела | |
| Delphi Новый Год В стране Олимпия приближается празднование Нового Года. Для подготовки празднования необходимо в каждую школу доставить новогоднюю елку. Если бы количество школ в стране была известна, то доставка елок не было бы сложной задачей. Но в стране на протяжении нескольких последних лет проводилась образовательная реформа и к сожалению никто не может определить точное количество школ. Известно лишь... https://www.cyberforum.ru/ delphi-beginners/ thread741796.html |
Найти три такие точки, чтобы треугольник, построенный на них, содержал внутри себя больше точек, чем снаружи Delphi ребята, помогите решить задачу: В типизированном файле даны координаты точек, отобразить эти точки на плоскости и найти три такие точки, чтобы треугольник, построенный на них, содержал внутри себя больше точек, чем снаружи, найти его площадь. я делал вот так: var myfile2:File of integer; a1,b1,a,i,j,k,x,y,x1,x2,y1,y2,c,d,e,p1,p2,p3,p4,p5,p6:integer;... |
| Delphi Генератор паролей Люди подскажите как сделать чтобы после каждых 15 символов ставил тире '-' или пропуск ' ' Вот код генератора procedure TForm1.Button1Click(Sender: TObject); var a,b,c,tmp:Char; dlina, i,X:integer; begin Edit1.Clear; Randomize; dlina:=15; https://www.cyberforum.ru/ delphi-beginners/ thread741732.html | Delphi Как в Delphi 7 вызвать TForm1.N1Click(Sender: TObject)? как в Delphi 7 вызвать TForm1.N1Click(Sender: TObject); https://www.cyberforum.ru/ delphi-beginners/ thread741730.html |
|
Delphi и на или Всем Привет, помогите найти ошибку в коде. Суть такова, программа должна заменять союз 'и' на 'или': procedure TForm1.Button1Click(Sender: TObject); var s:string; a:integer; begin label1.Caption:='Vvedite predlojenie'; s:=Edit1.Text; for a:=1 to length(s) do begin if (s='и') then s:='или' Edit2.text:=inttostr(s); |
Delphi Дата и время в делфи необходимо рандомно вводить дату и записывать в базу данных с помощью дататайм, а так же сравнивать с введенными вручную датами того же типа. Как это делать? https://www.cyberforum.ru/ delphi-beginners/ thread741712.html |
| Delphi Сортировка через CheckBox Нужно чтоб производилась сортировка записей в момент нажатия на флажок, а когда его убираю, то должно возвращаться к первоначальному виду. Пытался сделать это так, но не работает: If not Form2.CheckBox2.Checked then begin Table1.IndexFieldNames:='FIO'; end else begin Table1.IndexFieldNames:='Nom';// для возврата в первоначальный вид, просто сортирую по номеру end end; https://www.cyberforum.ru/ delphi-beginners/ thread741696.html |
Даны целые числа K, N, а также K наборов целых чисел по N элементов в каждом наборе Delphi Даны целые числа K, N, а также K наборов целых чисел по N элементов в каждом наборе. Найти количество наборов, содержащих число 2. Если таких наборов нет, то вывести 0. Var o,k,l,m,j,i:integer; n:integer; a:array of real; begin k:=strtoint(edit1.Text); n:=strtoint(edit2.Text); l:=0; randomize; |
|
Delphi Нужна любая программа на разветвление
https://www.cyberforum.ru/ delphi-beginners/ thread741659.html нужна любая программа на разветвление! Срочно надо! |
Delphi Не получается сделать массив Разработать програмное приложение, реализующее решение задачи: Дан одномерный массив А, состоящий из n элементов (n<=12). Найти среднее арифметическое отрицательных элементов. Сформировать одномерный массив В из элементов массива А с четным индексом. Выполнить сортировку массива А по убыванию методом пузырька. Размерность и элементы массива вводятся пользователем. Для ввода размерности... https://www.cyberforum.ru/ delphi-beginners/ thread741656.html |
|
Delphi Пояснения к задаче Всем доброй ночи=) Нужна помощь! Есть программа, нужно к ней написать пояснения что как происходит, что какая функция делаю и т.п. Буду очень признателен за помощь=) unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Buttons, StdCtrls; type |
Delphi Про файлы кое-что
https://www.cyberforum.ru/ delphi-beginners/ thread741621.html Подскажите, пожалуйста, как выполнить чтение построчно из одного файла в другой? f : Text; Listing : Text; Содержание f (несколько таких строк): 1) 1 2 3 2) 3 4 2 3) 2 5 4 4) 3 5 4 2 |
|
23 / 23 / 30
Регистрация: 23.10.2012
Сообщений: 344
|
|
| 22.12.2012, 13:24 [ТС] | 0 |
Форма с 2 языками - Delphi - Ответ 389867422.12.2012, 13:24. Показов 936. Ответов 11
Метки (Все метки)
Ответ
А как вы считаете так лучше если язык можно переключать кнопкой? или с отдельными формами лучше? Может есть другой способ решения, если есть, то буду рад выслушать
Вернуться к обсуждению: Форма с 2 языками Delphi
0
|
|
| 22.12.2012, 13:24 | |
|
Готовые ответы и решения:
11
Устраняем баги с средами и языками программирования Сделать, чтобы при нажатии на форме 2 на кнопку, форма 2 закрывалась, а форма 1 открывалась Проблемы с языками |
| 22.12.2012, 13:24 | |
| 22.12.2012, 13:24 | |
|
Помогаю со студенческими работами здесь
0
Глюк с языками Помогите с языками Работа с другими языками Заполнение базы с 2 языками |
Наверх