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

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

Новости • Файловые архивы
Поиск • Активные темы • Топ лист
Правила • Кто в 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

Открыть новую тему

Написать ответ в эту тему

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

SolidSnakeRU Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору Лого почти как у силверлайта. И нет даже видео демонстрации. Странно что они что-то собрали.
	Всего записей: 248 \| Зарегистр. 27-08-2008 \| Отправлено: 21:23 02-12-2014

G787 Advanced Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору ChSerg Да вы правы уже поздно, чет я запоздал
	Всего записей: 1035 \| Зарегистр. 04-12-2005 \| Отправлено: 22:02 02-12-2014

landy Full Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору Если они собираются транслировать все GDI-вызовы, то в результате получится обычный RDP-клиент в браузере.
	Всего записей: 576 \| Зарегистр. 17-01-2003 \| Отправлено: 11:04 03-12-2014

VadimShvarts Junior Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору All В связи с выходом XE7 Update1 обновил версию XE7 Distiller
	Всего записей: 75 \| Зарегистр. 03-11-2006 \| Отправлено: 13:33 03-12-2014

NickNNN Junior Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору VadimShvarts, спасибо. Я качал сборку с рутрекера, там патч рабочий тоже есть
	Всего записей: 156 \| Зарегистр. 25-11-2008 \| Отправлено: 13:57 03-12-2014

landy

Full Member

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

Цитата:

Вопрос как можно обращаться к переменным в базе данных? Я хочу обратиться как к массиву - записать 1-ый элемент из таблицы names в memo1: Memo1.Text:=SQL.table(names).array[1].asString , но так не работает. Дайте совет пожалуйста.

В базе данных не переменные, а таблицы и поля. Плюс, нет такого понятия как номер строки - только идентификатор. Чтобы перебрать все строчки и обратиться к полям тебе нужно сделать цикл наподобие такого:

Код:

Tbl.First;
while not Tbl.Eof do begin
Memo1.Lines.Add (Tbl.FieldValues['Name']);
Tbl.Next;
end;

Всего записей: 576 | Зарегистр. 17-01-2003 | Отправлено: 16:27 03-12-2014

deyatel1974 Newbie	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору а есть ли способ создать такой редактор свойсва чтобы он работал во время отладки через окно evaluate/inspect?
	Всего записей: 23 \| Зарегистр. 10-08-2014 \| Отправлено: 21:23 03-12-2014

kaz_av Full Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору deyatel1974 Похоже на визуализаторы. Не они? (source\visualizers)
	Всего записей: 439 \| Зарегистр. 15-02-2006 \| Отправлено: 02:13 04-12-2014

landy Full Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору deyatel1974, вот статья
	Всего записей: 576 \| Зарегистр. 17-01-2003 \| Отправлено: 11:35 04-12-2014

SolidSnakeRU

Member

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

Как нормально уничтожить объект при использовании дженериков?

Код:

TRestResult<T> = class
MethodResult: T;
public
constructor Create(MethodResult: T);
destructor Destroy(); override;
end;

TGetAPIInfoResult = class
APIVersion: Double;
APINode: string;
MethodInfo: array of string;
constructor Create;
destructor Destroy; override;
end;

{ tRestResult }

constructor TRestResult<T>.Create(MethodResult: T);
begin
Self.MethodResult := MethodResult;
InitResult();
end;

// Надо как-то понять что такое MethodResult и если это объект, уничтожить его.
destructor TRestResult<T>.Destroy;
begin
/// MethodResult.Free ??
//if TypeInfo(MethodResult) = TGetAPIInfoResult then
//MethodResult<T>.Destroy;
inherited;
end;

// Тут T это TGetAPIInfoResult
function TNode1.GetAPIInfo(): TRestResult<TGetAPIInfoResult>;
begin
Result := TRestResult<TGetAPIInfoResult>.Create(TGetAPIInfoResult.Create);
// Исполнение метода
Result.MethodResult.APIVersion := const_APIVersion;
Result.MethodResult.APINode := Self.ClassName;
end;

// Тут T это строка
function TNode1.EchoString(Value: string): TRestResult<string>;
begin
Result := TRestResult<string>.Create('');
Result.MethodResult := Value;
end;

Всего записей: 248 | Зарегистр. 27-08-2008 | Отправлено: 12:30 04-12-2014 | Исправлено: SolidSnakeRU, 12:34 04-12-2014

kaz_av Full Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору SolidSnakeRU If PTypeInfo(TypeInfo(T)).Kind = tkClass Then TObject(MethodResult).Free;
	Всего записей: 439 \| Зарегистр. 15-02-2006 \| Отправлено: 13:08 04-12-2014 \| Исправлено: kaz_av, 13:19 04-12-2014

Eternal_Shield

Advanced Member

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

SolidSnakeRU
Если в Delphi XE7, то:

Код:

if GetTypeKind(T) = tkClass then
TObject(PPointer(@MethodResult)^).Free;

ну или объявить PObject = ^TObject, тогда запись будет красивее:

Код:

if GetTypeKind(T) = tkClass then
PObject(@MethodResult).Free;

Всего записей: 766 | Зарегистр. 18-05-2009 | Отправлено: 13:37 04-12-2014 | Исправлено: Eternal_Shield, 13:38 04-12-2014

SolidSnakeRU Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору kaz_av, Eternal_Shield Спасибо! XE6, вариант с TObject(MethodResult).Free не компилируется. А вот TObject(PPointer(@MethodResult)^).Free работает Спасибо!
	Всего записей: 248 \| Зарегистр. 27-08-2008 \| Отправлено: 14:54 04-12-2014

xpin2013 Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору Зы не баньте. Предлагаю ещё вариант: TObject(NativeInt(Pointer(String(Char(Word(Byte(Random(0)))))))))
	Всего записей: 291 \| Зарегистр. 16-01-2014 \| Отправлено: 15:02 04-12-2014

SolidSnakeRU

Member

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

И правда красивее, заменил на это

Код:

if GetTypeKind(T) = tkClass then
PObject(@MethodResult).Free;

Всего записей: 248 | Зарегистр. 27-08-2008 | Отправлено: 15:17 04-12-2014 | Исправлено: SolidSnakeRU, 15:18 04-12-2014

Eternal_Shield

Advanced Member

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

xpin2013

Цитата:

TObject(NativeInt(Pointer(String(Char(Word(Byte(Random(0)))))))))

Меня тоже это коробит, но по другому пути, судя по всему, у ем-ро пойти не хватило могзов. В такие моменты я завидую СИшным макросам: Задефайнил а-ля if (x) x.Free() и понеслась, а у нас .. а у нас гондурас ... в сердце каждого из нас.

SolidSnakeRU

Цитата:

И правда красивее

А если ещё обратите внимание на кодген GetTypeKind vs PTypeInfo(TypeInfo(T)).Kind, то с вами вообще приятный шок приключится

Всего записей: 766 | Зарегистр. 18-05-2009 | Отправлено: 18:58 04-12-2014 | Исправлено: Eternal_Shield, 19:01 04-12-2014

landy

Full Member

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

Цитата:

CGDevtools - это надстройка над Intraweb, все контролы представляют собой jquery плагины с серверной оберткой.
Фреймворк позволяет сделать действительно красивое веб приложение.

SolidSnakeRU, а TMS Advanced Charts for IntraWeb не приходилось использовать?

Всего записей: 576 | Зарегистр. 17-01-2003 | Отправлено: 20:35 04-12-2014

SolidSnakeRU

Member

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

landy
Нет, имхо не особо красиво

Искал красивые чарты и пришел к выводу, что если потребуется выводить чарты, скачаю какой-нибудь красивый Javascript плагин и буду подавать ему данные на вход.

Всего записей: 248 | Зарегистр. 27-08-2008 | Отправлено: 20:52 04-12-2014

Newbie

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

Есть тут кто умеет работать хоть с какими нибудь базами данных в delphi xe7? Как мне можно получить данные из самой базы так как с массива? Заранее спасибо.

Всего записей: 20 | Зарегистр. 10-02-2013 | Отправлено: 22:19 04-12-2014

Junior Member

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

Цитата:

Есть тут кто умеет работать хоть с какими нибудь базами данных в delphi xe7? Как мне можно получить данные из самой базы так как с массива? Заранее спасибо.

Сложные данные сохраняю в XML, его потом в BLOB

P.S. Обещал показать финальное приложение на XE7 под Android - https://play.google.com/store/apps/details?id=ua.vsgroup.wincalc_mobile

Как работает - мне самому не очень нравится. Буду переписывать на JAVA

Всего записей: 156 | Зарегистр. 25-11-2008 | Отправлено: 22:50 04-12-2014

Открыть новую тему

Написать ответ в эту тему

Страницы: 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