» Вопросы по Embarcadero RAD Studio XE5-XE8,10.x(Seattle, Berl

Цитата:

Ищу - ничего не получается.

Эту тему смотрели?


Код: PlaySound("Test", 0, SND_RESOURCE ); // из ресурсов, где "Test" имя в ресурсе

landy. большое спасибо!!!

SolidSnakeRU, а графики там насколько кастомизируются? Есть ли возможность скроллинга, несколько серий на одной шкале времени? Поддерживаются ли подграфики?

Господа позвольте отрекламировать: Пока они собирают бабло то за $25 можно получить будущую лицензию

Thinfinity® VirtualUI™ –a comprehensive HTML5 UI-Remoting Solution for .Net, Delphi, Visual C++ and ActiveX



Thinfinity® VirtualUI™ is a software solution that enables developers to instantly take to the web their existing Windows applications. By adding one line of code to the application's project, you can transform your Windows application into a Web one, enabling it to run as usual on Windows or remotely from any modern Web browser.

https://www.kickstarter.com/projects/1981928931/virtualuitm-a-comprehensive-html5-ui-remoting-solu

landy
Графики есть (в т.ч. в онлайн демке "plot charts").
Дизайн настраивается, судя по тому, что у них каждый раз рандомные цвета.
Скролинг - если речь про увеличение области графика - видел такое в демке (options - zoom). Несколько серий поддерживается, подграфики видимо нет (хотя если есть события клика, можно самому сделать через фрейм).

PS: До графиков в своем проекте пока не добрался, так что реально не тестировал.

Цитата:

за $25 можно получить будущую лицензию

Ага. Давайте. Потом нам всем и расскажете...

Лого почти как у силверлайта. И нет даже видео демонстрации. Странно что они что-то собрали.

ChSerg
Да вы правы уже поздно, чет я запоздал

Если они собираются транслировать все GDI-вызовы, то в результате получится обычный RDP-клиент в браузере.

All
В связи с выходом XE7 Update1 обновил версию XE7 Distiller

VadimShvarts, спасибо. Я качал сборку с рутрекера, там патч рабочий тоже есть

Цитата:

Вопрос как можно обращаться к переменным в базе данных? Я хочу обратиться как к массиву - записать 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;

а есть ли способ создать такой редактор свойсва чтобы он работал во время отладки через окно evaluate/inspect?

deyatel1974
Похоже на визуализаторы. Не они? (source\visualizers)

deyatel1974, вот статья

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

Код:
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;

SolidSnakeRU
If PTypeInfo(TypeInfo(T)).Kind = tkClass Then
TObject(MethodResult).Free;

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

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

kaz_av, Eternal_Shield
Спасибо! XE6, вариант с TObject(MethodResult).Free не компилируется.
А вот TObject(PPointer(@MethodResult)^).Free работает
Спасибо!

Зы не баньте. Предлагаю ещё вариант:
TObject(NativeInt(Pointer(String(Char(Word(Byte(Random(0)))))))))

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

Код: if GetTypeKind(T) = tkClass then
PObject(@MethodResult).Free;

xpin2013

Цитата:

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

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

SolidSnakeRU

Цитата:

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

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

Цитата:

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

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

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

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

Цитата:

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

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

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

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

NickNNN
Скрин, где на закладках сплошные точки это что-то. Дизай однозначно менять нужно

Цитата:

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

Если тебе нужна именно индексная адресация в полностью загруженной в память таблице - попробуй TMemTableEh из EhLib (либо аналогичный InMemory Dataset.)

SolidSnakeRU

Цитата:

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

Прошу прощения, что вклиниваюсь, но вдруг будет полезно. Я, когда недавно искал симпатичный чарт, в итоге так и поступил. Встроил простой и симпатичный Flot и просто подаю ему на вход данные в готовом виде. Если интересно - скриншот.

Medium, спасибо, выглядит симпатично. А какими способами он может принимать данные от внешней программы?