ShIvADeSt Moderator Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Продолжение темы Вопросы по Delphi (до версии 2009) - часть 4 Познаем сами, помогаем другим... Обсуждаем вопросы, не связанные с юникоидными версиями Delphi - для этого есть соответствующая тема (см. ссылки ниже). Правила топика: Прежде чем спрашивать: Желательно изучить вопрос, попытаться найти ответ в прилагаемых мануалах, хелпах и анализируя исходники. Выполнить поиск по топику (открыть "Версия для печати" и поискать ответ там). Применить фильтр по разделу "Прикладное программирование". Ответы на многие старые вопросы могли быть даны в отдельных темах. Продумайте вопрос. На поверхностные вопросы вы получите поверхностные ответы, или вообще ответов не получите. Желательно указывать версии используемого компилятора и операционной системы. Прежде чем отвечать: Если не можете помочь, не мешайте. Если уж вы отвечаете на вопрос, давайте ответ по сути. Если вы не уверены, так и говорите! Ошибочный, но авторитетно звучащий ответ хуже, чем отсутствие ответа. Задавайте дополнительные вопросы, чтобы получить больше информации. Отсутствие ответа не равносильно игнорированию - иногда участники форума просто не знают ответ. Повторная посылка вопроса не приветствуется. Посты типа "неужели никто не знает ответа..." или "может мне все-таки кто-нибудь ответит" недопустимы.   Все большие куски кода (более 5 строк) оформляем в тег [morе] дабы уменьшить размер поста. FAQ по тегу [morе]. Некоторые "родственные" топики: Вопросы по Delphi (версии 2009-2010 Weaver) Вопросы по компонентам для Delphi, C++ Builder Использование DevExpress Вопросы по Ehlib Компоненты и утилиты для Delphi/BCB/FreePascal/Lazarus - только Open Source Коммерческие компоненты и утилиты для Delphi/BCB Прикладное программирование и не только... См. также: Некоторые полезные ресурсы о Delphi Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 02:09 28-06-2009 | Исправлено: psa1974, 12:00 02-02-2010

mauar Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Есть 5 переменных типа string например: s1..s5 : string;    и 5 переменных типа integer.   a1..a5 : integer;   Я целочисленные переменные перевожу в строковые, у меня получается 10 строковых переменных,   5 переменных с именами  s1..s5   и   5 переменных с именами a1..a5.   Далее эти переменные заносятся в     memo1.lines.add((s1)+(s2)+(s3)+(s4)+(s5)+(a1)+(a2)+(a3)+(a4)+(a5));     Мне нужно чтобы эти переменные в memo указывались в случайном произвольном порядке.     Например чтобы стало вот так. memo1.lines.add((s1)+(a2)+(a3)+(s5)+(a1)+(s2)+(s3)+(a4)+(s4)+(a5));   Главное чтобы они в произвольном порядке могли отображаться в мемо при запуске программы. Всего записей: 134 | Зарегистр. 31-07-2006 | Отправлено: 00:00 20-12-2009

psa1974 Full Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору mauar Цитата: Мне нужно чтобы эти переменные в memo указывались в случайном произвольном порядке. Алгоритм: объявляешь массив из 10 строковых элементов, инициализируешь его своими "5 переменными с именами  s1..s5" и "5 переменными с именами a1..a5". Затем пересортировуешь элементы массива случайным образом и формируешь строку, подряд выбирая все 10 элементов массива. смотри здесь вариант решения ---------- У программёра есть два состояния: "Втупляю" и "Попёрло"... Всего записей: 438 | Зарегистр. 08-11-2005 | Отправлено: 01:45 20-12-2009 | Исправлено: psa1974, 04:58 20-12-2009

ShIvADeSt Moderator Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору SIgor33 Цитата: А примерчик можно   Ндас, а на гугле забанили? Код:   Подключить сетевой ресурс: WNetAddConnection(NetResourse, Password, LocalName: PChar): longint; где    1. NetResourse - имя сетевого ресурса (например '\\P166\c')    2. Password - пароль на доступ к ресурсу (если нет пароля, то пустая строка)    3. LocalName - имя, под которым сетевой ресурс будет отображен на данном компьютере (например 'F:') Пример подключения сетевого диска: WNetAddConnection('\\P166\C', '', 'F:');   ---------- И создал Бог женщину... Существо получилось злобное, но забавное... Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 10:42 21-12-2009

data man Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору SIgor33   В dsiwin32.zip есть такие функции, возвращающие true в случае "удачи":   function DSiConnectToNetworkResource(const networkResource: string; const mappedLetter: string; const username: string; const password: string): boolean;   function  DSiDisconnectFromNetworkResource(mappedLetter: char; updateProfile: boolean = false): boolean; ---------- Любой достаточно развитый тролль неотличим от подлинно помешанного на какой-либо идее. Кекс. Антибиотики. Ламбада. Всего записей: 1696 | Зарегистр. 13-10-2005 | Отправлено: 11:05 21-12-2009 | Исправлено: data man, 11:06 21-12-2009

VandB Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Уважаемые "форумчане", те кто работает с 3D не сочтите за трудность, помогите пожалуйста. Вот здесь : http://forum.ru-board.com/topic.cgi?forum=33&topic=10849#lt . Заранее спасибо. (Вопрос непосредственно по Delphi) Всего записей: 164 | Зарегистр. 05-05-2009 | Отправлено: 15:46 22-12-2009 | Исправлено: VandB, 15:46 22-12-2009

ShIvADeSt Moderator Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору straxxx При старте сделать перечисление процессов. Если процессов более двух, то завершаться. Либо -   стартуем процесс, процесс пытается создать мьютекс например MyCoolMutex1. Если все ок - то запускаемся, если нет - то пытаемся создать MyCoolMutex2. Если все нормально, то мы второй процесс - и запускаемся. Если опять обломинго - то увы, мы третий процесс и выходим. ---------- И создал Бог женщину... Существо получилось злобное, но забавное... Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 02:31 23-12-2009

ShIvADeSt Moderator Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору straxxx Код:        CreateMutex(nil, false, 'MyTestMutex1');      if GetLastError=ERROR_ALREADY_EXISTS then begin        CreateMutex(nil, false, 'MyTestMutex2');        if GetLastError=ERROR_ALREADY_EXISTS then Halt(0);      end;     примерно так. ---------- И создал Бог женщину... Существо получилось злобное, но забавное... Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 10:54 23-12-2009

zakov Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Подскажите, может кто сталкивался!? Как в dbGrid изменить предопределенную реакцию на нажития клавиш. Т.е. вместо установленных действий на нажатие Enter, Tab, Esc, Down, Up, Left, Right, при нажатии на символьные и цифровые клавиши dbGrid не должен входить в режим редактирования. Хочется сделать не обходными путями, как то обработка KeyPress и KeyDown, а переопределить методы компонента. Может кто знает где копать в source? Всего записей: 163 | Зарегистр. 24-01-2008 | Отправлено: 16:07 23-12-2009

ShIvADeSt Moderator Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору zakov В свойствах Гриды (там где всякие RowSelect) отключи Editing и будет тебе счастье. ---------- И создал Бог женщину... Существо получилось злобное, но забавное... Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 02:37 24-12-2009

zakov Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Цитата: zakov   В свойствах Гриды (там где всякие RowSelect) отключи Editing и будет тебе счастье.   Я так и сделал. Только коряво получается. Пользователю надо оставить возможность редактировать данные в гриде.   Я сделал так, что по нажатию определенных клавиш или дбл клике на ячейке обработчик делает грид редактируемым, при смене строки грид опять делаю не редактируемым. Для добавления строки по кнопке вниз опять таки обработчик, так как грид постоянно не редактируемый, а надо, чтобы это срабатывало. Так вот, куча кода получается. И мне это богатство нужно во всех формах проекта. Поэтому я и хочу изменить компонент, а как и где незнаю. Опыта по написанию компонент у меня нет. Может кто поможет, желательно кодом... Всего записей: 163 | Зарегистр. 24-01-2008 | Отправлено: 02:46 24-12-2009

LordMAD Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору ppkp Цитата: Как отличить tkFloat обычый double или TDateTime ?   Код: if PropInfo^.PropType^ = System.TypeInfo(TDateTime) then ... Всего записей: 378 | Зарегистр. 01-10-2002 | Отправлено: 14:08 26-12-2009

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по Delphi (до версии 2009) - часть 5

ShIvADeSt (19-05-2010 05:14): Продолжаем тут http://forum.ru-board.com/topic.cgi?forum=33&topic=11215

Переход по форумам  Закладки   » Компьютеры Цифровое изображение Программы Microsoft Windows UNIX Другие OS Hardware В помощь сисадмину Прикладное программирование Игры Форумные игры   » Интернет Web-программирование В помощь вебмастеру Графика Хостинг Зацените-ка!   » Тематические Ikonboard v.2 Ikonboard v.3 Invision Board Другие форумы PHP-Nuke и другие порталы Мобила   » Общие Спорт Флейм Темы по региональным встречам Музыка и Кино Юмор Литература и Живопись   » Ru.Board Новости Помощь по форуму   » Андеграунд eBookz Варезник Раздачи и акции Мобильный варезник Андеграунд Игры и фильмы   » Специальные Тестирование