Подсветка

← →
Kerk © (2014-10-10 13:19) [0]

procedure Announce; begin ShowMessage("Как нам новая фича?"); end;

select "Отлично!" from dual;

← →
Игорь Шевченко © (2014-10-10 13:22) [1]

IE6 рулит :)

Чем мне нравится этот сайт - он под IE6 вполне себе успешно работает. И хорошо бы, оставался и впредь таким.

← →
Германн © (2014-10-10 13:24) [2]

> Как нам новая фича?

Беру две. Заверните. :)

← →
Kerk © (2014-10-10 13:26) [3]

> Игорь Шевченко © (10.10.14 13:22) [1]
>
> IE6 рулит :)

Обратная совместимость - наше всё :)

← →
Eraser © (2014-10-10 13:34) [4]

> Kerk © (10.10.14 13:19)

таки разрешили модифицировать форум? неужели пришел праздник и на нашу улицу ;-)

← →
ProstoTak © (2014-10-10 13:35) [5]

select "А как же MS SQL";

← →
ProstoTak © (2014-10-10 13:36) [6]

[code]select "А как же MS SQL";[/code]

← →
ProstoTak © (2014-10-10 13:36) [7]

ну вот, а как использовать - не рассказали.

← →
Kerk © (2014-10-10 13:37) [8]

Объявление по всему форуму висит. Не буду его дублировать для чистоты эксперимента))

← →
Игорь Шевченко © (2014-10-10 13:37) [9]

Eraser © (10.10.14 13:34) [4]

Не пришел

← →
Kerk © (2014-10-10 13:37) [10]

> Eraser © (10.10.14 13:34) [4]

Ну говорили же, что когда введут обязательную регистрацию, сразу лучше на форуме станет. Начинает сбываться понемногу, похоже :)

← →
Kerk © (2014-10-10 13:39) [11]

> Игорь Шевченко © (10.10.14 13:37) [9]
>
> Eraser © (10.10.14 13:34) [4]
>
> Не пришел

http://www.youtube.com/watch?v=Qfuz7eSlgDA

← →
Ega23 © (2014-10-10 13:39) [12]

BOLD плохо выглядит. Не очень жирно. М.б. другим цветом, тёмно-синим например?
В целом - зачот.

← →
Rouse_ © (2014-10-10 13:40) [13]

> ProstoTak © (10.10.14 13:36) [6]
> [code]select "А как же MS SQL";[/code]

select "А как же MS SQL";

Скобки угловые должны быть а не квадратные

<_sql>select "А как же MS SQL";<_/sql> - убрать подчеркивания

← →
turbouser © (2014-10-10 13:54) [14]

select top(1) t.answer from answers t where t.question = "А как же MS SQL";

← →
turbouser © (2014-10-10 13:55) [15]

Как-то мрачновато ключевые слова выглядят :)

← →
Германн © (2014-10-10 13:56) [16]

Только что в этой подсветке другой фон был, а сейчас уже нет его. Куда делся?

← →
Ega23 © (2014-10-10 14:09) [17]

with TList.Create do try

insert into ttt select newid()
finally Free; end;

← →
turbouser © (2014-10-10 14:34) [18]

select "уже лучше" /* :) */

← →
turbouser © (2014-10-10 14:39) [19]

DECLARE @CurrentID int DECLARE @Level int SELECT TOP(1) @CurrentID = BrandID FROM Brands ORDER BY BrandID DECLARE @StackTable TABLE (ID int, Level int) DECLARE @OutputTable TABLE (ID int, [Name] nvarchar(32), ParentID int, Level int) INSERT INTO @StackTable VALUES(@CurrentID, 1) SET @Level = 1 WHILE @Level > 0 BEGIN IF EXISTS (SELECT * FROM @StackTable WHERE Level = @Level) BEGIN SELECT @CurrentID = ID FROM @StackTable WHERE Level = @Level INSERT INTO @OutputTable SELECT BrandID, [Name], ParentID, @Level AS Level FROM Brands WHERE BrandID = @CurrentID DELETE FROM @StackTable WHERE Level = @Level AND ID = @CurrentID INSERT @StackTable SELECT BrandID, @Level + 1 FROM Brands WHERE ParentID = @CurrentID IF @@ROWCOUNT > 0 SET @Level = @Level + 1 END ELSE SET @Level = @Level - 1 END SELECT * FROM @OutputTable ORDER BY ID

← →
turbouser © (2014-10-10 14:40) [20]

Не, все-таки мрачновато и трудночитабельно :(

← →
Kerk © (2014-10-10 14:41) [21]

T-SQL вроде никто не обещал :)

← →
Alarm © (2014-10-10 14:44) [22]

select "А как выглядят запросы SQL";

← →
Inovet © (2014-10-10 16:24) [23]

Отлично! Шрифты с палитрой - дело наживное.

← →
Ega23 © (2014-10-10 17:46) [24]

Рома, а совместимость с твоей серой абизяной? Там это дело выключать, или как?

← →
Kerk © (2014-10-10 17:49) [25]

> Ega23 © (10.10.14 17:46) [24]
>
> Рома, а совместимость с твоей серой абизяной?

Думаю, стоит выключать. Зачем тебе сразу две подсветки? :)

← →
Ega23 © (2014-10-10 17:52) [26]

да, так лутше. Занчительно

← →
DVM © (2014-10-10 18:08) [27]

Код должен быть в блоке с нумерацией строк, но так чтобы копировался без нумерации.
в [19] вообще жесть какая то.

← →
Rouse_ © (2014-10-10 18:19) [28]

> DVM © (10.10.14 18:08) [27]
> Код должен быть в блоке с нумерацией строк

+1 - об этом я уже говорил Ромке
ЗЫ: лично мое IMHO - все-же стоит вернуть изначальный белый фон, чтоб было видно что вот все что выше написанное - код:

а вот это не код, хоть он и заключен в нужные теги

← →
Rouse_ © (2014-10-10 18:20) [29]

Зы: кстати, при использовании тегов, отступ слева отсутствует.

← →
Kerk © (2014-10-10 18:24) [30]

Вроде и так ясно, что это код
int main() { string FullName; double Hours; double GetHours(string FullName); FullName = GetName(); Hours = GetHours(FullName); cout << "\nEmployee"s Name: " << FullName; cout << "\nWeekly Hours: " << Hours << " hours\n\n"; return 0; }
и без всяких фонов. Зато как-то в глазах не мельтешит.

Но обсуждаемо, конечно. Можно вообще другую библиотеку прикрутить.

← →
Kerk © (2014-10-10 18:27) [31]

Ну и вообще можно вернуть как было. Синенькое. Раз никому не нравится.

← →
Eraser © (2014-10-10 18:55) [32]

> Kerk © (10.10.14 18:27) [31]

всем не угодишь - в любом случае, намного лучше, чем было.

вернули бы кнопку цитирования постов еще, иначе пользоваться с мобильных устройств фактически не реально.

← →
Kerk © (2014-10-10 18:56) [33]

А кто-нибудь помнит когда цитирование убрали и зачем? Была же какая-то причина.

← →
Eraser © (2014-10-10 18:58) [34]

> Kerk © (10.10.14 18:56) [33]

причина была простая, что-то переклинило в движке (что именно - не разбирались, на сколько я понял) и взяли да откатились на предыдущую версию.

← →
Rouse_ © (2014-10-10 19:08) [35]

> Можно вообще другую библиотеку прикрутить.

Подумай за номера строчек, а вообще лучше заведи голосовалку.
Движков синтаксической подсветки море и в 99 процентах используются те наработки, к которым все давно привыкли.
Ты ж сам говорил что подключить любое стронней двигло дело пяти минут :)
Темболее скорее всего народ предложит какие-то еще более хорошие варианты, о которых мы и не знаем.

← →
Ega23 © (2014-10-10 19:13) [36]

Надо брать ту, что по-умолчанию в Delphi. Для SQL - её же использовать.

← →
Pavia © (2014-10-10 19:22) [37]

Ребят. Код должен быть без номеров строк. Иначе его трудно копировать, надо будет удалять их. Так что категорически против номеров строк.

← →
RWolf © (2014-10-10 19:30) [38]

в правильном хайлайтере номера строк нельзя выделить вместе с кодом.

← →
Kerk © (2014-10-10 19:39) [39]

Давайте в порядке эксперимента подключу другую библиотеку. Но не сегодня, а завтра, например. Потом по итогам выходных к понедельнику сделаем выбор.

← →
Rouse_ © (2014-10-10 19:59) [40]

> Kerk © (10.10.14 19:39) [39]
> Давайте в порядке эксперимента подключу другую библиотеку.
>

+1
Ромч, но лучше это сделать у тебя на тестовой площадке и банально выложить скриншоты вариантов. ИМХО так ты и покроешь все варианты и дашь народу посмотреть, что ему больше нравится.

← →
Rouse_ © (2014-10-10 20:02) [41]

> Pavia © (10.10.14 19:22) [37]
> Ребят. Код должен быть без номеров строк. Иначе его трудно
> копировать, надо будет удалять их. Так что категорически
> против номеров строк.

Пфф, берем примером вот эту статью: http://alexander-bagel.blogspot.ru/2014/04/vm.html
Ищем строку "Смотрим что именно поменялось:"
Ниже нее идет код, который я прямо сейчас выделил мышкой:

_IMAGE_DOS_HEADER = record { DOS .EXE header } e_magic: Word; { Magic number } e_cblp: Word; { Bytes on last page of file } e_cp: Word; { Pages in file } e_crlc: Word; { Relocations } e_cparhdr: Word; { Size of header in paragraphs } e_minalloc: Word; { Minimum extra paragraphs needed }

Номеров строчек не наблюдается.
Так нормально?

← →
Pavia © (2014-10-10 20:10) [42]

Если сделаете по нормальному то да. У вас вроде норм. Хотя где-то мне глючное попадалось.

← →
DVM © (2014-10-10 22:55) [43]

Чтобы код не выделялся вместе с номерами достаточно его поместить в разные с номерами столбцы таблицы. Собственно, по ссылке Rouse_ так и сделано.

← →
Inovet © (2014-10-10 23:19) [44]

> [29] Rouse_ © (10.10.14 18:20)
> Зы: кстати, при использовании тегов, отступ слева отсутствует.

С этим первым отступом давно проблема.

← →
Andy BitOff © (2014-10-11 04:48) [45]

На мобиле, в лисе это выглядит вот так, слишком маленький текст
http://s30.postimg.org/yj3rcm2m7/tmp_12705_Screenshot_2014_10_11_04_43_24_2988064.png

← →
Eraser © (2014-10-11 10:48) [46]

Да вроде норм, может какие-то настройки масштабирования выставлены?

← →
Kerk © (2014-10-11 12:53) [47]

Попробуй еще раз на мобилке.

← →
turbouser © (2014-10-11 14:41) [48]

> Kerk © (11.10.14 12:53) [47]

Ром, все-таки надо над подсветкой поработать, посмотри хоть как на RSDN - там как минимум цвета и шрифты (?) из vs2008 (даже для ANSI SQL вполне приемлемо) Для Delphi - соответственно из стандартного набора абракадабры

← →
Kerk © (2014-10-11 16:20) [49]

Давайте так. Цвета/шрифты можно настроить совершенно любые. Если есть примеры кому какие конкретно цвета/шрифты нравятся, то давайте сюда запостим ссылки и обсудим. Или просто берем стандартные цвета Delphi и все? Впишется ли оно органично в форум?

> даже для ANSI SQL вполне приемлемо

Для ANSI SQL и тут вполне приемлимо. А ты почему-то упорно хочешь T-SQL запостить :)

← →
turbouser © (2014-10-11 16:34) [50]

> Kerk © (11.10.14 16:20) [49]

> Для ANSI SQL и тут вполне приемлимо. А ты почему-то упорно
> хочешь T-SQL запостить :)

> Для ANSI SQL и тут вполне приемлимо.

Пример?
T-SQL( то, что в 19) это просто взято из гугла, для проверки. Ром, ну не надо, а?

← →
Kerk © (2014-10-11 16:45) [51]

> Пример?

В этой ветке полно уже примеров. Вот тебе еще один.

SELECT table3.room_number FROM table1 INNER JOIN table2 ON table1.user_id = table2.user_id INNER JOIN table3 ON table2.phone_id = table3.phone_id WHERE table1.username = "qux";

← →
turbouser © (2014-10-11 16:46) [52]

> Kerk © (11.10.14 16:45) [51]

Ужас, летящий на крыльях ночи :)

← →
Kerk © (2014-10-11 16:48) [53]

> turbouser © (11.10.14 16:46) [52]

В итоге я просто верну как было синенькое и забью на попытки сделать форум лучше.
Не ожидал настолько враждебной реакции. Начинаю понимать почему форум так долго не развивался.

← →
turbouser © (2014-10-11 16:48) [54]

> Kerk ©

о вкусах не спорят, однако от чего отталкиваться. есть если не стандарты, то то к чему люди привыкли.

← →
turbouser © (2014-10-11 16:49) [55]

> Kerk © (11.10.14 16:48) [53]

> В итоге я просто верну как было синенькое и забью на попытки
> сделать форум лучше.

не не не

> е ожидал настолько враждебной реакции. Начинаю понимать
> почему форум так долго не развивался.

где враждебность?

← →
turbouser © (2014-10-11 16:53) [56]

> Kerk ©

мы стараемся помочь, критикой например, а ты воспринимаешь как враждебность :(

← →
Kerk © (2014-10-11 17:24) [57]

> turbouser © (11.10.14 16:53) [56]

Я возможно эмоционально отреагировал. Но я трачу личное время, мне никто за это не платит и в результате видеть реакцию в стиле "кошмарный мрачный ужас" - это не очень приятно. Хочется вернуть как было и забыть. Реально конструктивное предложение тут было только одно - добавить нумерацию строк. С цветами все проще - берем конкретные коды цветов в виде #xxxxxx и заменяем. Заменить легко. Определить на что менять не легко. Вот такого рода помощь была бы действительно полезной.

К слову о стандартах. Местная подсветка практически дублирует подсветку кода на github. Там никто вроде не жалуется.

← →
Eraser © (2014-10-11 17:36) [58]

> Kerk © (11.10.14 16:48) [53]

враждебная реакция, в основном, от одного пользователя, не новичок же вроде в интернетах, чтобы вестись на замечания особо впечатлительных граждан )

← →
Inovet © (2014-10-11 17:40) [59]

> [53] Kerk © (11.10.14 16:48)
> Не ожидал настолько враждебной реакции.

Да забей, или фильтруй, или просто имей ввиду отдельные мнения. Делай, и всё.

← →
Inovet © (2014-10-11 17:44) [60]

> [57] Kerk © (11.10.14 17:24)
> "кошмарный мрачный ужас"

"Ужас летящий на крыльях ночи" - цитата из Макса Фрая, рекомендую для психологической разгрузки. Но не всем оно идёт, я пытался пару лет назад перечитать - что-то не пошло, как раньше, лет 16 назад.

← →
Kerk © (2014-10-11 18:26) [61]

procedure Test; ShowMessage("Подключил вторую библиотеку. Как вам?");

select id from answers where text = "Еще лучше!"

Подключил вторую библиотеку поиграться. Играться с помощью тэгов. [delphi2] и [sql2] (угловые скобки вместо квадратных, конечно). Временно активными будут обе. Потом одну оставим какую-нибудь.

Существенная разница в нумерации строк. Первая раскрашивалка не умеет нумеровать строки. Это такая политическая позиция ее авторов. Вторая умеет.

← →
Kerk © (2014-10-11 18:29) [62]

procedure TForm1.OpenDelphiUnit1Click(Sender: TObject); var SL: TStringList; begin if OpenDialog1.Execute then begin SL := TStringList.Create; try SL.LoadFromFile(OpenDialog1.FileName); try Memo1.Lines.Text := FormatXMLData(Parse(SL.Text)); except on E: EParserException do Memo1.Lines.Add(Format("[%d, %d] %s", [E.Line, E.Col, E.Message])); end; finally SL.Free; end; end; end;

← →
Inovet © (2014-10-11 18:59) [63]

> [61] Kerk © (11.10.14 18:26)
> Как вам?

Зер гуд!

← →
Германн © (2014-10-11 21:45) [64]

> Kerk © (11.10.14 18:29) [62]

Мне нравится. Только чисто моё пожелание сделать цвет строковых констант каким-нибудь красным.

← →
Pavia © (2014-10-11 22:04) [65]

Отлично. Только палитру цветов подкорректировать.

← →
Pavia © (2014-10-11 22:06) [66]

[delphi2]
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if Key="." then Key:=",";
if not(Key in [ #8,"0".."9",","]) then Key:=#0;
end;
[/delphi2]

← →
Pavia © (2014-10-11 22:07) [67]

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if Key="." then Key:=","; if not(Key in [ #8,"0".."9",","]) then Key:=#0; end;

← →
Дмитрий С © (2014-10-11 22:07) [68]

Выглядит слишком современно. Как дырки в сайте

← →
Sha © (2014-10-11 22:09) [69]

мне и палитра и нумерация нравятся

← →
turbouser © (2014-10-11 22:38) [70]

Ура :)

← →
Andy BitOff © (2014-10-11 23:33) [71]

Eraser © (11.10.14 10:48) [46]
Да вроде норм, может какие-то настройки масштабирования выставлены?

Kerk © (11.10.14 12:53) [47]
Попробуй еще раз на мобилке.

Да не, также. Да иладно, в общем-то
http://s29.postimg.org/nczzmz5kl/tmp_22934_Screenshot_2014_10_11_23_25_30_7428648.png

← →
DVM © (2014-10-12 00:34) [72]

> Kerk © (11.10.14 18:29) [62]

супер, еще до кучи можно чуть-чуть строки через одну полосатым фоном отделить и будет вообще отлично. Но и так хорошо.

← →
Германн © (2014-10-12 01:33) [73]

> DVM © (12.10.14 00:34) [72]
>
>
> > Kerk © (11.10.14 18:29) [62]
>
> супер, еще до кучи можно чуть-чуть строки через одну полосатым
> фоном отделить и будет вообще отлично.

Лично по мне, то не надо. Эта полосатость порой просто достает своей пёстростью при полной ненужности.

← →
Германн © (2014-10-12 02:04) [74]

> Kerk © (11.10.14 16:20) [49]
>
> Давайте так. Цвета/шрифты можно настроить совершенно любые.
> Если есть примеры кому какие конкретно цвета/шрифты нравятся,
> то давайте сюда запостим ссылки и обсудим. Или просто берем
> стандартные цвета Delphi и все? Впишется ли оно органично
> в форум?
>

Насчёт шрифтов промолчу, ибо не замучивался ими. Насчёт цветов готов высказать своё имхо, но не знаю как это "просто" сделать. У меня есть любимые настройки подсветки синтаксиса редактора начиная с турбо паскаля и во многом они совпадают с предпочтениями большинства.

← →
Dennis I. Komarov © (2014-10-12 11:32) [75]

begin Halt(0); end;

← →
Dennis I. Komarov © (2014-10-12 11:36) [76]

begin Halt(0); end;

← →
Dennis I. Komarov © (2014-10-12 11:42) [77]

select * from mytable as a where a.x>a.y

select * from mytable as a where a.x>a.y

← →
Kerk © (2014-10-12 14:20) [78]

Вижу вторая версия больше приглянулась. Ну и хорошо. Завтра тогда уберу один из вариантов. Скорее всего оставим второй.

← →
jack128 © (2014-10-12 14:39) [79]

в можно фон во второй библиотеке сделать того же цвета, что фон сайта?

> jack128 © (12.10.14 14:39) [79]
>
> в можно фон во второй библиотеке сделать того же цвета,
> что фон сайта?
>

А почему? Чем тебе этот фон мешает?

а смысл в этой подсветке, код давно уже никто не выкладывает :)

Второй вариант отличный, цвет фона тоже устраивает - блок кода выделяется на фоне текста.

Вторая явно лучше, и фон тоже лучше оставить, чтоб выделялся.

Только ты проверь один момент, у этой подсветке при большом куске кода скролы появляются, я у себя их руками убирал.

Удалено модератором
Примечание: не получилось

{ Touch Input defines and functions } type { Touch input handle } HTOUCHINPUT = THandle; {$EXTERNALSYM HTOUCHINPUT} PTOUCHINPUT = ^TOUCHINPUT; TOUCHINPUT = record x: Integer; y: Integer; hSource: THandle; dwID: DWORD; dwFlags: DWORD; dwMask: DWORD; dwTime: DWORD; dwExtraInfo: ULONG_PTR; cxContact: DWORD; cyContact: DWORD; end; tagTOUCHINPUT = TOUCHINPUT; {$EXTERNALSYM tagTOUCHINPUT} TTouchInput = TOUCHINPUT; {$EXTERNALSYM TOUCHINPUT} {$EXTERNALSYM PTOUCHINPUT} { * Conversion of touch input coordinates to pixels * winuser.h: #define TOUCH_COORD_TO_PIXEL(l) ((l) / 100) } function TOUCH_COORD_TO_PIXEL(l: Integer): Integer; inline; {$EXTERNALSYM TOUCH_COORD_TO_PIXEL} { * Touch input flag values (TOUCHINPUT.dwFlags) } const TOUCHEVENTF_MOVE = $0001; {$EXTERNALSYM TOUCHEVENTF_MOVE} TOUCHEVENTF_DOWN = $0002; {$EXTERNALSYM TOUCHEVENTF_DOWN} TOUCHEVENTF_UP = $0004; {$EXTERNALSYM TOUCHEVENTF_UP} TOUCHEVENTF_INRANGE = $0008; {$EXTERNALSYM TOUCHEVENTF_INRANGE} TOUCHEVENTF_PRIMARY = $0010; {$EXTERNALSYM TOUCHEVENTF_PRIMARY} TOUCHEVENTF_NOCOALESCE = $0020; {$EXTERNALSYM TOUCHEVENTF_NOCOALESCE} TOUCHEVENTF_PEN = $0040; {$EXTERNALSYM TOUCHEVENTF_PEN} TOUCHEVENTF_PALM = $0080; {$EXTERNALSYM TOUCHEVENTF_PALM} { * Touch input mask values (TOUCHINPUT.dwMask) } TOUCHINPUTMASKF_TIMEFROMSYSTEM = $0001; // the dwTime field contains a system generated value {$EXTERNALSYM TOUCHINPUTMASKF_TIMEFROMSYSTEM} TOUCHINPUTMASKF_EXTRAINFO = $0002; // the dwExtraInfo field is valid {$EXTERNALSYM TOUCHINPUTMASKF_EXTRAINFO} TOUCHINPUTMASKF_CONTACTAREA = $0004; // the cxContact and cyContact fields are valid {$EXTERNALSYM TOUCHINPUTMASKF_CONTACTAREA} function GetTouchInputInfo(hTouchInput: HTOUCHINPUT; cInputs: UINT; pInputs: PTOUCHINPUT; cbSize: Integer): BOOL; stdcall; {$EXTERNALSYM GetTouchInputInfo} function CloseTouchInputHandle(hTouchInput: HTOUCHINPUT): BOOL; stdcall; {$EXTERNALSYM CloseTouchInputHandle} { RegisterTouchWindow flag values } const TWF_FINETOUCH = $00000001; {$EXTERNALSYM TWF_FINETOUCH} TWF_WANTPALM = $00000002; {$EXTERNALSYM TWF_WANTPALM} function RegisterTouchWindow(hwnd: HWND; ulFlags: Cardinal): BOOL; stdcall; {$EXTERNALSYM RegisterTouchWindow} function UnregisterTouchWindow(hwnd: HWND): BOOL; stdcall; {$EXTERNALSYM UnregisterTouchWindow} function IsTouchWindow(hwnd: HWND; pulFlags: PULONG): BOOL; stdcall; {$EXTERNALSYM IsTouchWindow} type PLastInputInfo = ^TLastInputInfo; {$EXTERNALSYM tagLASTINPUTINFO} tagLASTINPUTINFO = record cbSize: UINT; dwTime: DWORD; end; TLastInputInfo = tagLASTINPUTINFO; {$EXTERNALSYM GetLastInputInfo} function GetLastInputInfo(var plii: TLastInputInfo): BOOL; stdcall;

Подсветка хорошая.
А как всё-таки будет с большими кусками кода?
Если, например, три тыщи строк загнать - ничего не сломается?

>код давно уже никто не выкладывает
Это потому что у нас (велосипеда) подсветки не было ;)

> MBo © (13.10.14 14:32) [88]
>
> Подсветка хорошая.
> А как всё-таки будет с большими кусками кода?
> Если, например, три тыщи строк загнать - ничего не сломается?

Вроде не должно сломаться. Надо попробовать и посмотреть что будет :)
В принципе на форуме есть ограничение на длину поста, так что вот прям три тысячи строк запостить не удастся все равно.

> Это потому что у нас (велосипеда) подсветки не было ;)

Ах вон оно в чем дело... тогда срочно начинаем постить код)

По большому счету - все равно.
Я привык как к аскетичному стилю раскраски, так и в Notepad++, но там раскраска поинтереснее.

Пользуясь наличием множества браузеров под рукой, проверил на IE 11, Opera 12.17, Chrome 37 и Firefox 31/32
Скрипт раскраски работает везде нормально, горизонтальная полоса прокрутки появляется только при невлезании хотя бы одной строки кода, что крайне кошерно.

Но обнаружился косяк, подтверждаю: в Firefox 31 и 32 всегда присутствует вертикальная полоса прокрутки, которая сдвигает ровно один пиксель :o)

(* Тестовая программа "в скобках" { Еще один тест *) program Project1; (*$APPTYPE CONSOLE*) (* Директива компилятора *) //{$APPTYPE CONSOLE} // Закомментированная директива компилятора (*{$APPTYPE CONSOLE}*) {Закомментированная директива компилятора} procedure Test; begin (* комментарий {вложенный коммент} *) { это коммент { однотипные комменты не вкладываются } Write({бла бла "{}"Test complete"); end;(*}*) begin (*bla bla) bla(*)Test; ReadLn; (*{"(* напоследок(*"*)//;-)))} *) (*){(*{ну} и "чтобы } добить" :)*) { {{ } {сме"рть (* парс"еру \m/ {{{} {Обрабатывать // это }// тоже } обязательно надо {(*) т.к. вдруг { кому-то приспичит (*(*)// " в заголовке модуля } { символьный рисунок сделать. Вроде ASCII-ART называется {{{{{{{{{{{} (*)еще раз тест }^_^{ (*) {//} end.

не все гладко с подсветкой как видите

Дим, ну это сторонний парсер, еще и его двигло под парсинг таких вещей допиливать имх Ромке грустно будет :)

Удалено модератором
Примечание: Нарушение правил форума

В любом случае именно эту подсветку нужно оставлять, ИМХО. Керку респект :o)
Разве что для Firefox контейнер можно попробовать по высоте/отступами подвигать, если будет желание.

Ну раз у нас тут консенсус, то убрал первый вариант. Потом добавлю кнопку еще к форме комментария и наступит счастье.

> Kerk © (14.10.14 13:22) [100]

> Потом добавлю кнопку еще к форме комментария и наступит
> счастье.

Версии Delphi можно добавить новые еще там + FreePascal. Насколько я понимаю это там должно быть элементарно.
Только их расплодилось столько, что выпадающий список нужен, а не радиокнопки. Или убрать вообще это.

Кстати, в этой подсветке еще есть возможность подсветить некоторые строки в коде, только я че-то не пойму как это сделать из самого сообщения.

Ого. Класс.
Ну уж если даже Делфимастер эволюционировал, то и за будущее страны в целом я спокоен :)

Баг в ветке "Задачка::Проверка бита" (http://delphimaster.net/view/15-1413270428/) начиная с сообщения [5] и заканчивая [11]
Или только у меня?
http://i.imgur.com/HDTpPmj.png
http://i.imgur.com/4SUoxla.png

Ой, сорри, там уже это обсудили :(

> Andy BitOff © (14.10.14 16:12) [103]

Не срабатывало автоматическое закрывание тэга. Я это теперь пофиксил.

Вот сейчас проверим.

WriteLn("А не закрою-ка я тэг");

Вот. Все нормально :)

Теперь еще меньше кода смотреть буду, а писать - тем более :(

> DVM © (14.10.14 13:48) [101]
>
> Кстати, в этой подсветке еще есть возможность подсветить
> некоторые строки в коде, только я че-то не пойму как это
> сделать из самого сообщения.

Через сообщение никак не сделать. Точнее сделать-то можно, но надо это в движке учесть.

> DVM © (14.10.14 13:48) [101]
>
>
> > Kerk © (14.10.14 13:22) [100]
>
>
> > Потом добавлю кнопку еще к форме комментария и наступит
> > счастье.
>
> Версии Delphi можно добавить новые еще там + FreePascal.
> Насколько я понимаю это там должно быть элементарно.
> Только их расплодилось столько, что выпадающий список нужен,
> а не радиокнопки. Или убрать вообще это.

Я бы убрал. Зачем оно нужно вообще.

Kerk, спасибо, а в этой классной зелёно-белой засветке можно шрифт поменять на Courier New?
( уж больно новомодно "велосипед" выглядит )

апп

Подсветка Найти похожие ветки