alex842
Все это планируется, спасибо )
8,826 2014-10-27 12:13:22
Re: хотелки (237 replies, posted in Russian)
8,827 2014-10-27 11:11:20
Re: Перенос программы на другой ПК (1 replies, posted in Russian)
Никаких специальных действий не требуется, просто скопируйте папку с проектом на другой компьютер, проект может работать даже с флешки.
можно сделать импорт из файла формата csv, который можно получить, сохранив Excel файл в данном формате.
Затем необходимо настроить скрипт, с учетом вашей базы данных.
Можете скачать пример проект с импортом
http://myvisualdatabase.com/forum/misc. … download=1
также можете воспользоваться бесплатной программы SQLite Studio, которая также умеет делать импорт в базу данных
http://sqlitestudio.pl/
8,828 2014-10-27 10:53:18
Re: Открыть файл с пробелами в адресе (17 replies, posted in Russian)
А если бы ещё можно было и начальную папку задавать...
procedure Form1_Button8_OnClick (Sender: string; var Cancel: boolean);
var
sFolder: string;
begin
sFolder := 'd:\Films';
if SelectDirectory('Select folder', '', sFolder) then
begin
ShowMessage(sFolder);
end;
end;
8,829 2014-10-27 10:02:36
Re: Открыть файл с пробелами в адресе (17 replies, posted in Russian)
alex842
попробуйте без проверок, просто сделав так, думаю кавычки в любом случае не помешают
OpenFile('"' + file + '"',prog);
8,830 2014-10-27 09:59:20
Re: Открыть файл с пробелами в адресе (17 replies, posted in Russian)
alex842
1.
OpenFile('D:\Films');
2. Добавил новую функцию в бета версию 1.46, скачайте ее: https://www.dropbox.com/s/30ysr48sd8ca4 … 6.zip?dl=0
SelectDirectory(const Caption: string; const Root: String; var Directory: string) : Boolean
procedure Form1_Button8_OnClick (Sender: string; var Cancel: boolean);
var
sFolder: string;
begin
if SelectDirectory('Select folder', '', sFolder) then
begin
ShowMessage(sFolder);
end;
end;
3. С этим пока сложней, постараюсь позже реализовать.
8,831 2014-10-27 09:20:01
Re: Комбобокс с возможностью ввода своих данных (2 replies, posted in Russian)
Приветствую,
только что меня об этом же спросили в англоязычной части форума )
я сделал пример, как это реализовать:
http://myvisualdatabase.com/forum/misc. … download=1
8,832 2014-10-27 09:18:24
Re: Dropdown option (9 replies, posted in Script)
ramonjrtan
I made example for you, please, download here:
8,833 2014-10-27 08:37:03
Re: [Решено] DBFile - открытие папки по умолчанию (8 replies, posted in Russian)
savage
Если я правильно понял, то никакая дополнительная проверка не нужна.
Нужно будет заняться этим, довольно много скопилось свойств у компонентов, которые можно было бы разместить в инспекторе объектов.
8,834 2014-10-26 21:52:33
Re: Files into Combobox (12 replies, posted in Script)
einsteinf5
Please, send me your project to support@drive-software.com with link to your post
i'll try to help you
Example how to use Copy, Delete, ReplaceStr:
procedure Form1_Button1_OnClick (Sender: string; var Cancel: boolean);
var
s: string;
begin
s := 'One Two';
s := Copy(s, 5, 3); // Copy(s: String; from, count: Integer): String
ShowMessage(s); // result is "Two"
s := 'One Two';
Delete(s, 5, 3); // Delete(var s: String; from, count: Integer)
ShowMessage(s); // result is "One"
s := 'One Two';
s := ReplaceStr(s, 'Two', 'One'); // ReplaceStr(const AText, AFromText, AToText: string): string
ShowMessage(s); // result is "One One"
end;
8,835 2014-10-26 21:44:49
Re: Files into Combobox (12 replies, posted in Script)
DanielDTR
Please, download latest beta version 1.46, where i added new method for ComboBox:
https://www.dropbox.com/s/30ysr48sd8ca4 … 6.zip?dl=0
Form1.ComboBox1.Clear;
8,836 2014-10-26 21:31:35
Re: [Решено] Таблица - словарь -- уникальные поля (4 replies, posted in Russian)
dpviper
Пришлите проект на support@drive-software.com
постараюсь помочь.
8,837 2014-10-26 20:07:27
Re: Связь между комбобоксами разных форм (2 replies, posted in Russian)
Приветствую,
можно, создайте событие OnShow для формы регистрации новой записи
procedure Form2_OnShow (Sender: string; Action: string);
begin
if Action = 'NewRecord' then Form2.ComboBox2.dbItemID := Form1.ComboBox1.dbItemID;
end;
8,838 2014-10-26 20:04:50
Re: [Решено] DBFile - открытие папки по умолчанию (8 replies, posted in Russian)
Form1.DBFile1.dbInitialDir := 'c:\';
8,839 2014-10-26 18:00:48
Re: [Решено] DBFile - открытие папки по умолчанию (8 replies, posted in Russian)
savage
скачайте бета версию 1.46, для компонента DBFile добавил свойство dbInitialDir.
https://www.dropbox.com/s/30ysr48sd8ca4 … 6.zip?dl=0
Позволяет задать путь по умолчанию для диалога открытия и сохранения файла.
p.s.
С кодом все ок.
8,840 2014-10-26 15:00:04
Re: SUM from sum TABLE results (2 replies, posted in Script)
varipatisem
You can do it using script.
Please, send me your project to support@drive-software.com
I'll try to help you.
8,841 2014-10-26 14:47:47
Re: хотелки (237 replies, posted in Russian)
Если я правильно понял, то необходимо так
OpenDialog.InitialDir := ExtractFileDir(Application.Exename) + 'otherFolder';
таким образом, где бы не находилась программа, всегда будет открываться папка otherFolder которая находится в папке с программой.
8,842 2014-10-26 11:44:22
Re: Как организовать вход в готовый проект по логину и паролю? (17 replies, posted in Russian)
kunar80
Приложите пожалуйста ваш архив проекта к сообщению без exe и dll файла, либо пришлите проект на support@drive-software.com со ссылкой на данный топик.
8,843 2014-10-26 08:22:12
Re: хотелки (237 replies, posted in Russian)
savage
OpenDialog.InitialDir := 'd:\Films'; // задаем папку по умолчанию
OpenDialog.InitialDir := ExtractFileDir(Application.Exename); // папка по умолчанию будет каталогом программы
8,844 2014-10-26 08:17:01
Re: Подвал.. (4 replies, posted in Russian)
Поправил ошибку, спасибо )
скачайте снова версию 1.46
https://www.dropbox.com/s/30ysr48sd8ca4 … 6.zip?dl=0
пришлите пожалуйста ваш проект на support@drive-software.com
посмотрю на счет NULL
8,845 2014-10-25 22:12:26
Re: Открыть файл с пробелами в адресе (17 replies, posted in Russian)
Есть такой нюанс, если указывается, чем необходимо открыть данный файл, то сам файл является параметром для программы, которая открывает этот файл, а в параметрах к файлу пробелы допустимы, при условии если параметр в кавычках.
попробуйте так
var
prog,file:string;
begin
prog:= 'C:\Program Files (x86)\Windows NT\Accessories\wordpad.exe';
file:= '"D:\MailCloud\Программирование\My Visual Database\DistribCat\ReadMe.rtf"';
OpenFile(file,prog);
8,846 2014-10-25 21:57:40
Re: img not in search (1 replies, posted in General)
Please, send me your project to support@drive-software.com
I'll try to help you.
8,847 2014-10-25 14:23:35
Re: Подвал.. (4 replies, posted in Russian)
Приветствую,
Спасибо за найденный баг, поправил, скачайте снова версию 1.46
https://www.dropbox.com/s/30ysr48sd8ca4 … 6.zip?dl=0
8,848 2014-10-25 14:13:07
Re: id - нужна ли проверка на уникальность? (2 replies, posted in Russian)
Приветствую,
проверка не нужна, id всегда будет уникальным.
8,849 2014-10-25 13:12:48
Re: Не работает "Цвет надписи" ! (3 replies, posted in Russian)
Как выяснилось, у кнопки вообще нельзя менять цвет надписи, за ее цвет отвечает исключительно тема Windows, поэтому данное свойство думаю необходимо скрыть.
8,850 2014-10-25 11:04:54
Re: avoid the same input if it exist in table ? (30 replies, posted in Script)
Please, download project: