You are not logged in. Please login or register.
My Visual Database → Posts by sibprogsistem
я имел ввиду
“Open Badges” – международная система фиксации достижений для образования в течение всей жизни. «открытый значок», то есть проверяемый цифровой мини диплом, которым легко поделиться в электронном письме, в социальных сетях, отобразить на личном сайте или в онлайн резюме.
электронный сертификат подтверждающий Ваши знания в определенной области..
Жаль, что на английском... Прочитать-то можно, но мне нравятся литературные переводы даже для технических книг.
вот, на Русском языке
https://drive.google.com/file/d/16XQYkt … sp=sharing
sibprogsistem wrote:Пазлы пока стоят на месте, много дел, разбирался с wix и velo, ну и болею еще так-что пока мало программирую ( когда болеешь сложно сосредоточится) .
Думаю вернуться к пазлам через неделю..Выздоравливай скорей!
спасибо
Жаль, что на английском... Прочитать-то можно, но мне нравятся литературные переводы даже для технических книг.
у меня на Русском ((
sibprogsistem wrote:Сделал подписку на сервисе WIX, работает хорошо, пока только paypal.. подучу Velo у можно будет попробовать создать подписку с другими сервисами..
400 руб. в месяц... и только PayPal ?
А на сайте пишут:
Wix принимает Visa, Mastercard, American Express, Discover, JCB и Diners. В вашем регионе могут быть доступны дополнительные способы оплаты.
А где хранишь инфу об оплате? тоже на WIX с доступом по API?
Да, там много способов оплаты, есть и наши сервисы, но именно для подписок есть только 3-и системы из них в России пока только paypal работает..
я взял со скидкой 50% на два года, этого времени в полне хватит для нормального тестирования, но пока мне все нравится..
sibprogsistem wrote:пытаюсь найти внятную информацию по работе с изображениями которая подошла бы для MVD
хочу сделать конструктор пазлов ..помогите с инфой
Как успехи у проекта с пазлами?
Лично мне в MVD частенько не хватает возможности работы с прозрачностью у PNG картинок. Нужен класс TPNGObject,
Пазлы пока стоят на месте, много дел, разбирался с wix и velo, ну и болею еще так-что пока мало программирую ( когда болеешь сложно сосредоточится) .
Думаю вернуться к пазлам через неделю..
В своей таблице в глубинах интернет вы храните:
1) ID пользователя (или ID машины, на которой установлена программа)
2) Дату окончания лицензииЭта информация формируется после оплаты через робокассу.
В самой программе при запуске и по таймеру (раз в час) идет обращение к этой волшебной таблице. Если найден ID и дата не просрочена - работаем, если нет - не работаем.
Из минусов - для работы потребуется интернет.
Для верности раз в сутки шерстить базу с ключами и удалять неактуальные пары, чтобы исключить обход защиты путём перестановки даты на рабочей станции. Или брать дату с MySQL сервера, где хранится база с ключами.
Сделал подписку на сервисе WIX, работает хорошо, пока только paypal.. подучу Velo у можно будет попробовать создать подписку с другими сервисами..
Приветствую всех. Рассматривал пример программы от Derek, Не могу понять как дабл клик по строке в гриде открывает форму с дополнительными данными по выбранной строке?
Скриптов нет, настройки грида стандартные, скрытых кнопок нет, как организовано открытие именно этой формы и именно с ай ди этой записи?
Ткните носом, кому не трудно...
Прикладываю проект Дерека...
секрет в кнопке с установленным действием ( показать запись )
мне надо переделывать базу получается?
ХЗ это только Вам известно ))!
procedure Form1_Button3_OnClick (Sender: TObject; var Cancel: boolean);
begin
if (Form1.TableGrid2.SelectedRow = -1) then showmessage('Выберите запись') else
begin
if IDYES = MessageBox('Вернуть сотрудника?', 'Вернуть', MB_YESNO)then begin
SQLExecute('UPDATE userwork SET work="0" WHERE id='+Form1.TableGrid2.sqlValue);
UPDATEDATABASE('userwork');
end;
end;
end;
procedure Form1_Button2_OnClick (Sender: TObject; var Cancel: boolean);
var
workName: string;
begin
if (Form1.TableGrid1.SelectedRow = -1) then showmessage('Выберите запись') else
begin
workName:=InputBox('Назначить работe','Имя работы','');
if (workName<>'') then begin
SQLExecute('INSERT INTO work(name)VALUES("'+workName+'")');
SQLExecute('UPDATE userwork SET id_work="'+IntToStr(Last_Insert_id)+'" WHERE id ='+Form1.TableGrid1.sqlValue);
SQLExecute('UPDATE userwork SET work="1" WHERE id='+Form1.TableGrid1.sqlValue);
UPDATEDATABASE('userwork');
UPDATEDATABASE('work');
end;
end;
end;Instead of bashing around to get an information about Dimtry, it would be more effective to use the time for looking for an alternative. All of us who are working with scripts could give Pilotlogic or Lazarus IDE a try if Embarcadero is to expensive. For all the others, there are maybe other tools around.
Take the situation as it is.
Just my two cent on this.
Delphi Community Edition free version Rad studio 10.3
https://www.embarcadero.com/ru/products … e-download
помню, что на форуме обсуждалась подобная тема, но не могу ее найти.
как вывести в форме MVD сторонний exe ?
Для просмотра HTML можно использовать TRichEdit
ООО это как ?
TWebBrowser знатно устарел будет - ли замена на TEdgeBrowser ?
http://docwiki.embarcadero.com/RADStudi … _Component
второй вариант
первый вариант
Выкладываю два черновика программы ( конструктор тестов).. Естественно черновой вариант имеет ошибки, но может кому-то все таки пригодится.
создавая эти черновики я искал варианты реализации своей идеи..
Я дума, что многие все таки заинтересуются.
Если Вам вдруг пригодится кокая-то часть кода, смело копируйте и используйте на свое усмотрение.
Для чего?
что бы изменения в forms.xml не повлияли определение главной формы
как программно задать главную форму?
Точно знаю, что комбобоксы обновляются автоматически при редактировании таблицы справочника с источником данных. Мне казалось, что при каждом открытии формы редактирования также происходит обновление содержимого комбобоксов формы редактирования (потому как форма тормозит при открытии, если на ней много комбиков). Присмотрелся - не производятся. ( Присматривался на MySQL).
Это только мне так казалось или раньше комбики сами обновлялись? Версия 6.5.
это какие-то глюки, у меня что-то обновляется а что-то нет..
Довольно туманная тема.... Речь идёт о MySQL и шифровании таблиц InnoBD? Или о доп.библиотеках для SQLite?
я про SQLite видимо проще создать процедуру и функцию записи и чтения которые будут использовать Encrypt/Decrypt
1. Array1: array [0..30] of integer;
Array2: array [0..31, 0...31] of integer;
Array3: array [0..20] of string;
2. Array1[1]:= var ;
for i:=0 lten.Count-1 do
Array1[i]:=lten[i];
3. showmessage(Array3[1]);
4. I don't understand the question, maybe this is
var_name := SQLExecute('SELECT field_name FROM table_name WHERE id=1');
OR
var_name := SQLExecute('SELECT "'+var_name+'" FROM table_name WHERE id=1'+var_name); // IntToStr(var_name)
SQLExecute('INSERT INTO table_name(field1,field2)VALUES("values1","'+var_name+'")');
SQLExecute('UPDATE table_name SET field_name="values" ');Помогите !!!
Не могу понять, где я ошибаюсь.
программа выводит только часть пазлов
Есть-ли в MVD функция Rect ? Может в MVD у нее другое имя?
мне нужно нарисовать прямоугольник
rim.Canvas.StretchDraw(Rect(0,0,480,320),Open);возможно-ли задать параметры криптографии базе данных по умолчанию или только через собственную функцию?
My Visual Database → Posts by sibprogsistem
Powered by PunBB, supported by Informer Technologies, Inc.
Theme Hydrogen by Kushi