Перейти из форума на сайт.

Новости • Файловые архивы
Поиск • Активные темы • Топ лист
Правила • Кто в on-line?
Вход • Забыли пароль? • Первый раз на этом сайте? • Регистрация
Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Embarcadero RAD Studio

Модерирует : ShIvADeSt

 Версия для печати • Подписаться • Добавить в закладки
Страницы: 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 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323

Открыть новую тему     Написать ответ в эту тему

V1s1ter



Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
         
Обсуждаем новые возможности и баги
 
Просьба писать про Embarcadero RAD Studio XE5, XE6, XE7, XE8, 10.x (Seattle, Berlin,Tokyo)
  По вопросам скачивания - Тема в Варезнике (lite-версии тут)
  Вопросы по неюникодным версиям Delphi — шестая бумага
  Бесплатные Компоненты и утилиты для Delphi/BCB/FreePascal/Lazarus
  Коммерческие компоненты и утилиты для Delphi/BCB
  Вопросы по компонентам для Delphi, C++ Builder разных версий
  Новые языковые возможности, начиная с Delphi 2005 по XE4 — здесь, и New!здесь еще
  Англоязычный официальный форум Embarcadero — здесь
  Embarcadero Quality Central, веб интерфейс — здесь, новый Quality Portal тут
  Программирование на Delphi — викиверситет
  Другие ресурсы
   Предыдущие бумаги
 
     Вопросы ..XE4       Вопросы ..XE3    Вопросы ..XE2      
  Вопросы ..2009-XE    Вопросы ..<2009 / ч.5    Вопросы ..<2009 / ч.4      
  Вопросы ..<2009 / ч.3    Вопросы ..Delphi 2 / ч.2    Вопросы ..Delphi  
  Выключение встроенного эксперта Castalia  для XE8 (иногда помогает при вылетах и тормозах)  
  Полезные плагины(эксперты)
Всего записей: 948 | Зарегистр. 06-02-2007 | Отправлено: 15:25 11-09-2013 | Исправлено: Komandor, 15:49 31-03-2024
AlexCoRu

BANNED		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Цитата:
В этом коде ещё и утечка есть, если поменять местами инт и строку
В реальном коде есть ещё GetDataType(Index).
Вот и какой вариант оставить? )
Всего записей: 911 | Зарегистр. 04-09-2003 | Отправлено: 21:57 30-07-2017
kaz_av

Full Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
AlexCoRu

Цитата:
Вот и какой вариант оставить?

Самый простой вариант я показал. С ним не будет ни утечек, ни крешей. Он не самый оптимальный, но оптимальность сильно зависит от нюансов использования кода, которые мне не известны.
Всего записей: 439 | Зарегистр. 15-02-2006 | Отправлено: 22:09 30-07-2017
AlexCoRu

BANNED		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
kaz_av, хм, а если так (по-сишному):

Код:
function GetDataValue(Buffer: Pointer; Index: Integer): Variant;
var
  P: Pointer;
  L: Integer;
  V: Variant;
begin
  V := Null;
  P := GetDataPtr(Buffer, Index);
  if not Assigned(P) then Exit(V);
  case Index of
    0:
    begin
      TVarData(V).VType := varInt64;
      TVarData(V).VInt64 := PInt64(P)^;
    end;
    1:
    begin
      L := GetDataSize(Buffer, Index);
      if L = 0 then Exit(V);
      TVarData(V).VType := varUString;
      SetString(UnicodeString(TVarData(V).VString), PAnsiChar(P), L);
    end;
  end;
  Exit(V);
end;
И работает.
Всего записей: 911 | Зарегистр. 04-09-2003 | Отправлено: 09:27 31-07-2017
kaz_av

Full Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
AlexCoRu

Цитата:
И работает.

Ну а чего бы ему не работать, когда делается то же самое. Только Null это вызов функции и не одной. Более того, оно, скорее всего, будет работать и без присваивания Null т.к. локальные переменные управляемых типов всегда инициализируются.
 
Добавлено:
Кстати, раз пошла такая пьянка... Даже эти приёмы не гарантируют беспроблемной работы кода в будущем, когда могут быть добавлены кастомные инициализаторы и финализаторы. Если, вдруг, у варианта появится кастомный инициализатор, который будет устанавливать в varEmpty поле VType и не будет трогать остальные (как сейчас делает функция Unassigned или та же Null только со значением varNull), то этот код снова будет падать. Поэтому для 100% избавления от потенциальных проблем в будущем, следует использовать константу с полностью обнулёнными полями для первоначальной инициализации результата. Но это уже для параноиков
 
Добавлено:
Хотя нет, константа тоже не спасёт
Всего записей: 439 | Зарегистр. 15-02-2006 | Отправлено: 09:50 31-07-2017 | Исправлено: kaz_av, 09:57 31-07-2017
funnyman

Junior Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Не подскажет ли кто, есть ли компоненты для работы с ecdsa? Интересует поддержка secp112r1, secp160r1 кривых.
Всего записей: 106 | Зарегистр. 08-01-2003 | Отправлено: 09:34 02-08-2017
Fantom77

Newbie		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Никто не сталкивался с таким багом - окно structure view пусто и не отображает ничего, система windows 10. rad studio 2010 C++ ? Может кто знает как исправить.. в инете находил что с такой проблемой встречались и на XE, но решения не нашли.
P.S. решение нашел сам. Если вдруг кому пригодиться, инструкция с их форума:
 
"Once you upgraded to Windows 10, do the following:
 
1) Uninstall Microsoft Visual J# 2.0.
2) However, since Microsoft do not support it anymore, the uninstall is not complete and you will have to finish it manually.
3) Remove all references to J# in the registry; there are quite a few so be patient.
4) Re-boot.
3) Re-instal Microsoft Visual J# and should install without a problem: http://www.microsoft.com/en-us/download/details.aspx?id=15468
4) You can now run C++ builder and the insight will also work.
 
It appears that with Windows 10, J# is install in a separate directly instead of just under .NET 2.0."
Всего записей: 18 | Зарегистр. 18-05-2006 | Отправлено: 13:27 07-08-2017 | Исправлено: Fantom77, 14:18 07-08-2017
Tulnov



Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Русификация Delphi 10.2.1 версии 25.0.27659.1188 (run-time, .pas-файлы) Пасс - стандартный.
Как устанавливать: содержимое архива распаковать в каталог, прописанный в Library Path, либо в папку с проектом.
Замечания, баги, пожелания - в личку.
 
з.ы. Сделано на основе Русификации Delphi 2007 (run-time, .pas-файлы) от PoleSoft
Всего записей: 749 | Зарегистр. 15-05-2003 | Отправлено: 19:49 09-08-2017
relictus

Silver Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
VadimShvarts
Обновите, пожалуйста, D102Distiller для Update 1.
Всего записей: 3712 | Зарегистр. 19-04-2005 | Отправлено: 10:47 10-08-2017
JackOff



Junior Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Всем привет!
 
Скиньте, пожалуйста, несколько файлов из установленной RadStudio 10.2
 
DCC32.EXE
rlink32.dll
SysInit.dcu
System.dcu
 
Очень надо! Заранее благодарю!
Всего записей: 73 | Зарегистр. 13-11-2005 | Отправлено: 10:27 14-08-2017
relictus

Silver Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
JackOff
https://yadi.sk/d/N_TrR9Lk3LyLsZ
SysInit.dcu, System.dcu по 5 шт. в разных папках
PS это из 10.2.1
Всего записей: 3712 | Зарегистр. 19-04-2005 | Отправлено: 13:49 14-08-2017 | Исправлено: relictus, 13:50 14-08-2017
JackOff



Junior Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
relictus большое спасибо что выручили! забыл указать что dcu-ки нужны от win32 и заставил Вас делать лишнюю работу.
Всего записей: 73 | Зарегистр. 13-11-2005 | Отправлено: 14:36 14-08-2017
SolidSnakeRU

Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Как мы знаем, в один момент времени может работать только 1 record helper.
Прописываем в uses модуль System.SysUtils, пишем в коде StringValue.ToLower - всё ровно.
Помощник по ошибкам кода не возмущается.
 
Создаю тип TTestType = string, подключаю свой модуль с хелпером для TTestType, отключаю System.SysUtils.
Метод работает, компилируется всё ок. Но IDE рисует ошибку.
Как научить IDE что всё хорошо? (строку выбрал для примера)
Подробнее...
Всего записей: 248 | Зарегистр. 27-08-2008 | Отправлено: 18:01 14-08-2017 | Исправлено: SolidSnakeRU, 18:12 14-08-2017
Eternal_Shield

Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
SolidSnakeRU

Код:
TTestTypeHelper = record helper for string

должно быть

Код:
TTestTypeHelper = record helper for TTestType

не?
ну, это чтобы придраться не к чему было. Понятное дело, что TTestType всего лишь алиас.
Можно было и так обявить:

Код:
TTestType = type string

тогда вообще не к чему придраться и ErrorInsight должон работать как миленький.
Всего записей: 767 | Зарегистр. 18-05-2009 | Отправлено: 21:28 14-08-2017 | Исправлено: Eternal_Shield, 00:19 15-08-2017
SolidSnakeRU

Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Все верно. Пример корявый)
Исходная ситуация с типом RawUTF8 из mORMot фреймворка.
Там тип объявлен как RawUTF8 = type AnsiString(CP_UTF8);
Пробую создать хелпер для RawUTF8, error insight и ругается.
Если переношу код декларации типа к себе в модуль, подсветка ошибки пропадает.
Компилируется, разумеется и так и так.
 
Подробнее...
 
Демо проект. (все модули на борту, ничего ставить не надо)
 
Путем проб и ошибок, обнаружил, что наличие такого кода в модуле ломает error insight

Код:
const
  SOME_CONST = {$I SomeInc.inc};

Баг IDE.
Всего записей: 248 | Зарегистр. 27-08-2008 | Отправлено: 00:49 15-08-2017 | Исправлено: SolidSnakeRU, 11:41 15-08-2017
vizier1966

Junior Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
привет всем.
столкнулся проблемой "The specified module could not be found." при установке пакетов (из исходников) на XE7
Ткните куда копать
Всего записей: 33 | Зарегистр. 28-02-2006 | Отправлено: 10:00 17-08-2017
asutp2

Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
vizier1966,
 
такая беда происходит из за слишком длинного Library Path. Решений несколько:
1. Устанавливать пакеты из командной строки, муторно, но проблему решает
2. Сократить пути в Library Path путем использования переменных. Например вместо "C:\Program Files (x86)\TMS Software" использовать "$(TMS)", где TMS - переменная ОС, указывающая на каталог  "C:\Program Files (x86)\TMS Software"
Всего записей: 791 | Зарегистр. 22-10-2004 | Отправлено: 10:20 17-08-2017
vizier1966

Junior Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
спасибо.
решение нашлось путем ввода пути, куда падают bpl, в переменные окружения windows 10
Всего записей: 33 | Зарегистр. 28-02-2006 | Отправлено: 10:29 17-08-2017
Dukekz

Junior Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Напомните пожалуйста, вроде раньше как-то получалось сделать, а сейчас забыл все напрочь))
 
Как переопределить системную константу? В модуле SOAPConst.pas определена
const
  SContentId = 'Content-ID';                                   { Do not localize }
 
Мне надо значение подправить на 'Content-Id'
Если меняю в исходнике, то ничего не происходит, значение в отладке остается старое((
 
 
Всего записей: 59 | Зарегистр. 24-12-2012 | Отправлено: 12:05 17-08-2017 | Исправлено: Dukekz, 12:07 17-08-2017
Frodo_Torbins

Silver Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Dukekz
Надо исходник в папку к проекту кинуть, или пакет с этим модулем пересобрать.
Всего записей: 2318 | Зарегистр. 24-05-2007 | Отправлено: 12:48 17-08-2017
Dukekz

Junior Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Frodo_Torbins
Аааааа, вот оно что, а я то ...  Завтра попробую.
ЗЫ Вообще я совсем забыл добавить, что проект на CBuilder, он то конечно исходник pas откомпилирует и даже не подавится)) Но все же может быть есть какой-то способ переопределить эти глобальные константы у себя в проекте без копирования исходного модуля?
Всего записей: 59 | Зарегистр. 24-12-2012 | Отправлено: 15:36 17-08-2017
Открыть новую тему     Написать ответ в эту тему

Страницы: 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 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Embarcadero RAD Studio


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru