Delphi | SEclub.org
Delphi
Все новые
Всего сообщений: 1912
*
MoteX
11 июл 2009 в 05:23
Привы ребята,а знает кто нибудь как просканировать часть текста в строке? допустим мне нужно узнать какие первые четыре символа прописаны в строке edit1.text ...понять никак не могу:)
*
Al.exeY
11 июл 2009 в 05:56
MoteX, var i:string; ... i:=copy(edit1.text,1,4); так то это начальный уровень, обычно во всех книгах пишут,странно что ты не знаешь :)
*
MoteX
11 июл 2009 в 08:52
Al.exeY, спасибо:)я самоучка:)без книг учился:)а как узнать сколько символов в строке?гг
*
javavirys
11 июл 2009 в 19:20
Блютyз, Bот тут найдеш русификатор: www.delphilab.ru/content/view/87/75/
11 июл 2009 в 19:21 / javavirys (1)
*
MoteX
12 июл 2009 в 03:53
Зачем русификатор на дельфи???русскими будут только пункты меню и настроек но не операторы компонентов с тулбарки:)помоему легче писать когда дельфи на ангельском:)
*
abvю
12 июл 2009 в 04:08
MoteX, Length(s)- определяет текущую длину строки.
12 июл 2009 в 04:11 / abvю (2)
*
LtiomaP
12 июл 2009 в 15:05
MoteX, функция есть lenght(s) ? где s - передаваемая строка
*
Ronnet Cat
19 июл 2009 в 13:19
Всем привет.снова. у кого-нибудь есть модуль для архивации в zip формата dos 1.0? (или если кто то пользовался модулем tvZip и знает как заставить делать 1.0 архивы,помогите плиз)
*
Miha
21 июл 2009 в 17:18
Люди, помогите пожалуйста. У меня тут короч ошибкаю Создал форму(main), альше разместил на ней Label(пустой). Вот код:
program assignproject;
uses
Forms,
assign in "assign.pas" {main};
begin
Label.caption := "sadgf" ;
end. Ошибку пишет в строчке с label
*
Miha
21 июл 2009 в 17:37
Хотя ладн. А может кто написать простенький пример изменения caption?
*
PilevE
21 июл 2009 в 23:21
Miha, все нужно в процедурах писать, например щелкаеш 2 щелч по форме получаешь процедуру которая и идет после запуска программы и в ней уже между begin и end пишешь label1.caption:="че там";
*
Miha
22 июл 2009 в 16:00
pileve, спасибо. Вот, кстати, написал ядро windows:
program windows 8;
Var
system: array [a...z, 0..9] of bugs;
Begin
Do
Something;
Until user=rip;
End.
Для полноценного использования разделов сайта войдите или зарегистрируйтесь.
Создание сайтов и программирование | Компьютеры | Форум | Главная
18+ © Seclub.org 2003-2026