Значит нельзя... Тогда по старинке делаем форму.
Тогда вопрос, как выудить картинки из программы, которые скрываются под MB_ICONINFORMATION и ему подобные...
My Visual Database → Posts by vit007
Значит нельзя... Тогда по старинке делаем форму.
Тогда вопрос, как выудить картинки из программы, которые скрываются под MB_ICONINFORMATION и ему подобные...
Подскажите, а можно здесь сделать, чтоб текст из Edit9 был жирный
if IDOK = MessageBox(frmNote.Edit9.Text,'Вопрос',MB_OKCANCEL+MB_ICONINFORMATION) then
Раз в тему с редактированием ячейки никто не написал... Былоб неплохо в ячейку Grid'а добавить возможность переноса содержимого на словам с автоматическим расширением ячейки, как в Exel с включенной этой ф-цией.
Хотелось бы в Grid авто перенос по словам и автоматическим расширением по содержимому.
Было б неплохо выбирать цвет заголовка в Grid. А то в 10 все сливается. Можно выбрать стиль Vista, но там не прикольно выглядит фильтрация по содержанию столбца (треугольничек лучше).
Не спасает, т.е. bsSingle не рисует рамку, наверно потому что использую EnableVisualStyle := False,
т.к. в 10ке нелепо смотрится Grid. Остается Panel подрисовать снизу.
ReadOnly -> True не дает должного эффекта, как меняется ширина столбцов так и меняется...
Да, а еще, как можно запретить изменять ширину столбцов. А то прога, иногда подглючивает, и вместо курсора мыши показывает значек изменения ширины столбцов...
Вроде настроек не крутил а вид без рамки, подскажите, как вернуть рамку...
Есть фраза на обязательное поле: "Данное поле обязательно для заполнения" Вот его можно изменить, и добавить звуковой сигнал.
сп., вроде, заработало...
Не-е, там только параметры и свойства настройки... это все понятно... Мне надо понять, как правильно условие if прописать, чтоб обе кнопки выполняли действие... Уже как-то создавал тему, где непонятно было с тремя кнопками... Или идти по пути создании формы с кнопками...
как его заставить обрабвтывать противоположное действие, т.е.
if IDNO = MessageBox
работает на отрицание при нажатии на "Нет", а вот "Да" как правильно прописать... Почему-то стандартное описание условие с else не работает.
Сп.
Хочу удалить из таблицы записи по определенной записи
var
cId : string;
begin
cId:=SQLEXecute('SELECT id FROM request WHERE id='+frmMain.TableGrid1.sqlValue);
//очистка таблицы
SQLExecute('DELETE FROM detali WHERE id='+cId);
//Обновление таблицы
frmNote.TableGrid2.dbUpdate;
end;
Так же пытаюсь узнать номер и тоже не выходит...
if SQLExecute('SELECT COUNT(id) FROM detali WHERE id='+cId) = 0 then
дает всегда "0"
Отличный пример, сп. derek.
procedure Form1_Button4_OnClick (Sender: TObject; var Cancel: boolean);
var
i,cR : integer;
begin
cR := Form1.TableGrid1.RowCount - 1;
for i := 0 to cR do
begin
Form1.Edit1.Text := Form1.TableGrid1.Cell[0,i];
end;
end;
Так работать не хочет
Требуется дернуть значения из таблицы (определенного столбца), по кнопке, и сумму поместить в текстовое поле.
А чем обусловлено, что картинка больше 24х24, не может быть, т.е. не отображается?
Ход правильный мыслей, но надо так...
procedure Form1_TableGrid1_OnDoubleClick (Sender: TObject; Action: string);
begin
if (... = 'Admin') then
begin
idZapr := Form1.TableGrid1.dbItemID;
idPlat :=SQLExecute ('SELECT id_plat FROM zapros WHERE zapros.id= '+inttostr(idZapr));
Form1.Button6.Click;
end else
end;
т.е. если учетка админ, то выполнить, обратно, знак <> (не равно)...
Из примера не понятно, как картинку загружать
вроде так
ImageList.AddPng(ExtractFilePath(Application.ExeName)+'images\new0.png');
У меня не получилось, либо ничего или черный квадрат.
Не понятно как быть с кнопками на других формах?
Приходится городить из-за виндового масштабирования...
А подскажите, как сделать чтоб стандартные значки кнопок масштабировались. Если внутри проги при 150, они масштабируются, а отдельно в проекте нет.
Заметил проблем, у меня форма проги создана при масштабе 100, но при переключении 125, она, форма, искажается, т.е.не происходит растягивание внутри проги, а вот при 150 все нормально.
Хотел сделать переход на вкладке ч/з кл. enter...
Масштабирование иконок кнопки.
My Visual Database → Posts by vit007
Powered by PunBB, supported by Informer Technologies, Inc.
Theme Hydrogen by Kushi