Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
 
 
Рейтинг 4.92/25: Рейтинг темы: голосов - 25, средняя оценка - 4.92
0 / 0 / 0
Регистрация: 23.05.2017
Сообщений: 76

Выравнивание в ячейке StringGrid по нажатию по кнопке

19.06.2017, 08:22. Показов 6249. Ответов 47
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Как сделать чтобы по нажатию на по кнопке в выделенной ячейке выравнивался текст 3 кнопки (левый край, центр, правый край)
P.S. Как в Excel
Заранее спасибо
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
19.06.2017, 08:22
Ответы с готовыми решениями:

Выравнивание в ячейке StringGrid
Пожалуйста, дайте полный код процедуры по выравниванию текста в ячейке StringGrid. В интернете находил способы для Delphi, но не смог с...

StringGrid: автоматически переходить к правой или нижней ячейке по нажатию Enter
Нашёл описание этого компонента, потихоньку разбираюсь, но встала задача, чтобы по нажатию на Enter курсор автоматически перемещался или...

Значение одной ячейки первого StringGrid-а присвоить другой ячейке второго StringGrid-а
скажите пожалуйста, вот нам даны две таблицы stringgrid, как значение одной ячейки,первой таблицы, присвоить другой ячейке второй таблице?

47
 Аватар для Пытливый
3765 / 2272 / 706
Регистрация: 29.05.2013
Сообщений: 9,622
22.06.2017, 20:31
Студворк — интернет-сервис помощи студентам
Разговор слепого с глухим. Уже даже не смешно.
0
0 / 0 / 0
Регистрация: 23.05.2017
Сообщений: 76
23.06.2017, 15:58  [ТС]
Цитата Сообщение от Massaraksh7 Посмотреть сообщение
Код.
вот
Вложения
Тип файла: rar код.rar (4.8 Кб, 3 просмотров)
0
Айлурофил
 Аватар для Massaraksh7
518 / 451 / 112
Регистрация: 27.05.2017
Сообщений: 2,750
Записей в блоге: 7
23.06.2017, 16:08
А какое отношение этот код имеет к тому, что я тебе давал? И где там TAlignCell?
0
500 / 346 / 200
Регистрация: 20.10.2016
Сообщений: 1,101
23.06.2017, 16:59
olympic43, не мучайте ни себя ни других, программирование это явно не ваше, бросайте вы это гиблое дело пока не поздно, займитесь тем к чему есть способности и душа лежит.
0
0 / 0 / 0
Регистрация: 23.05.2017
Сообщений: 76
23.06.2017, 17:20  [ТС]
Цитата Сообщение от Massaraksh7 Посмотреть сообщение
А какое отношение этот код имеет к тому, что я тебе давал? И где там TAlignCell?
Цитата Сообщение от TFullControl Посмотреть сообщение
olympic43, не мучайте ни себя ни других, программирование это явно не ваше, бросайте вы это гиблое дело пока не поздно, займитесь тем к чему есть способности и душа лежит.
ч умничать то вот тема с исходником, сделайте если сможете
Внести изменения в исходник табличного редактора
0
500 / 346 / 200
Регистрация: 20.10.2016
Сообщений: 1,101
23.06.2017, 17:46
olympic43, А-ха-ха, ну и печальный ты тип, удивляешься чего у тебя не работает то, что мы тут все тебе понаписали, а у самого в OnCreate формы что???
Delphi
1
StringGrid1.OnDrawCell:=nil;
Впихнул в сей ехе код выравнивания, вот как это выглядит, теперь думаю разобраться вообще не сложно:
Вложения
Тип файла: rar Project1.rar (828.9 Кб, 5 просмотров)
0
0 / 0 / 0
Регистрация: 23.05.2017
Сообщений: 76
23.06.2017, 21:09  [ТС]
Цитата Сообщение от TFullControl Посмотреть сообщение
olympic43, А-ха-ха, ну и печальный ты тип, удивляешься чего у тебя не работает то, что мы тут все тебе понаписали, а у самого в OnCreate формы что???
DelphiВыделить код
1
StringGrid1.OnDrawCell:=nil;
Впихнул в сей ехе код выравнивания, вот как это выглядит, теперь думаю разобраться вообще не сложно:
ахахаххахаххаха, ч ты впихал то?!??! ничего не работает
диапазон перестал выделяться
выравнивание по всей таблице идет, а не в ячейке
стиль шрифта там вообще другая история.. когда пишешь то норм, энтер нажимаешь все меняется
ты вообще тестил?
ты нормально сможешь сделать?
и исходник кинуть?
0
500 / 346 / 200
Регистрация: 20.10.2016
Сообщений: 1,101
24.06.2017, 08:47
Цитата Сообщение от olympic43 Посмотреть сообщение
ничего не работает
Дружище, как тема твоя дразница "Выравнивание в ячейке StringGrid по нажатию по кнопке"? Код рабочий я тебе дал, пример на твоем же ПО привел, вариантов выравнивания в теме уже более чем достаточно! Остальной твой код я даже и читать не буду, столько печального бесполезного кода в одном месте, как по мне, это перебор.
Править что-то в нем смысла нет, единственный разумный вариант удалить все и писать с нуля, на халяву я этого делать не буду, могу только направить советом и поддержать парой строк кода.
Что касается выравнивания отдельной ячейки, а именно это и надо делать, то проблема не в любом из приведенных в теме кодов, а в твоей реализации логика ПО в целом. Если делать по уму, то надо создать класс TCellStyle в котором будут описаны все настройки: цвет, размер, стиль шрифта, цвет ячейки, выравнивание ячейки, формула (по которой вычисляется значение ячейки) и т.п. И только после этого в OnDrawCell все отрисовывать, читая значения полей экземпляра TCellStyle, переданого в свою очередь в Object ячейки.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
24.06.2017, 08:47

Выравнивание в ячейке таблицы
Я понимаю, што подобные темы поднимаются каждую неделю, но чот я уже с ума схожу. Такое ощущение, что у меня сам подход неверный... В...

QTableView выравнивание иконки в ячейке
Здравствуйте форумчане, помогите решить простой вопрос. Есть QTableView с моделью. В ячейках должен отображаться текст и иконка. Делаю...

Выравнивание элементов в ячейке таблицы
Здравствуйте. Подскажите как выровнять ссылки относительно таблицы. Код HTML: <div class="catalog"> <table...

Вертикальное выравнивание в ячейке TStringGrid
понадобилось мне сделать выравнивание текста по центру ячейки. наваял код procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol,...

Выравнивание QCheckBox в ячейке QTableWidget
Доброго времени суток коллеги. Суть вопроса в следующем: В ячейке таблицы необходимо установить чекбокс. Но не просто так, а выровнять...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
48
Ответ Создать тему
Новые блоги и статьи
Про "Windows must die!"
kumehtar 04.11.2026
Знаете, чет накатило. . . . Когда-то это было почти боевым кличем: мол, нормальный человек сидит на DOS, OS/ 2 или Linux, а вот это вот - Must Die. А теперь человек произносит «мастдай» с усмешкой - и. . .
Красочные поля с номером страницы svg+background-image
russiannick 04.11.2026
Красочные поля с номером страницы не менее важны чем в эпоху бумажных книг. Посему спешу представить почтеннейшей публике этот важный инструмент который эти поля и формирует. В процессе разработки. . .
Вступаем в новую фазу генерации favicons, векторную.
russiannick 02.11.2026
Теперь нет нужды скрывать что используется простой svg. Исходный код изображения помещаем в поле и жмем кнопку. Исходник преобразуется в вид корректный для помещения в favicon или в url(). Нажатие. . .
Генератор паролей (вариант №4)
Maks 01.11.2026
После публикации 3-го варианта генератора паролей, разослал его своим коллегам (с целью оценки), в итоге были получены следующие рекомендации: 1. Вернуть возможность использования знаков | 1 l I;. . .
Генератор паролей (вариант №3)
Maks 30.10.2026
Финальная версия генератора паролей 1С. Доработка решения в этот раз коснулась только визуальной части, а именно, добавлен реквизит ДопПараметры (тип Булево), который скрывает/ отображает реквизиты:. . .
Магическое мышление и магия, современная наука не отличима от магии (говорит ИИ Джемени)
zorxor 30.10.2026
Джемени, расскажи, пожалуйста, что такое магическое мышление, что такое магия, почему современная наука чем-то напоминает магию? Фраза «Любая достаточно развитая технология неотличима от магии». . .
За какое время ИИ может подобрать пароль по хешу (рассказывает Джемени ИИ)
zorxor 30.10.2026
Расскажи, Джемени, если известен хэш МД5, например, за сколько ИИ сможет подобрать соответствующий пароль? Искусственный интеллект (ИИ) может подобрать простой или средний по сложности пароль по. . .
Кто убил Suno? Почему наше солнышко погасло? (диалог с ИИ Джемени)
zorxor 30.10.2026
Как убивали Suno. Хронология. «Убийство» музыкальной нейросети Suno — это затяжной процесс, в котором технологический хайп стартапа разбился о жесткую реальность судебных исков от гигантов. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru