Как вывести одинарную кавычку в Паскале

Lazarus IDE: Основы программирования в Windows

Несмотря на то, что всё потихоньку уходит в сеть, программирование для настольных компьютеров остаётся востребованным. И будет таковым ещё долго. Ну а самая распространённая операционная система для настольных компьютеров – это по-прежнему Windows. Поэтому любой программист, даже если он собирается стать веб-разработчиком, должен знать хотя бы основы создания программ для Windows. Подробнее...

Даже начинающие программисты знают, что строки в Паскале заключаются в одинарные кавычки. Однако как быть, если на экран надо вывести именно одинарную кавычку? Ведь компилятор воспринимает этот символ как начало или конец строки, и не отображает его на экране...

Решить эту задачу можно несколькими способами. Первый способ является и простым и сложным одновременно. Простым, потому что вам не потребуется использовать никаких дополнительных символов. А сложным, потому что здесь можно довольно легко запутаться. Пример:

WriteLn('''');

Этот код выведет на экран ОДНУ одинарную кавычку. Но для этого вам придётся написать четыре кавычки.

Здесь первая и последняя кавычки как и всегда открывают и закрывают строку. А затем вместо одной одинарной кавычки мы пишем две.

По есть в Паскале, чтобы ввести в строку одинарную кавычку, надо просто написать её два раза. Это легко сделать, если одинарная кавычка выводится в тексте, например:

WriteLn('I won''t do it');

Здесь мы просто вместо одной кавычке пишем две, и всё прекрасно работает.

Однако в более сложных случаях (да даже в таких, как первый пример) можно запутаться. К примеру, нам надо сформировать строку для SQL-запроса, в которой некоторые параметры должны быть в одинарных кавычках. В этом случае можно легко добавить лишнюю кавычку или наоборот, не поставить её там, где она будет нужна. Поэтому лично я использую другой способ:

WriteLn('SELECT * FROM TABLE WHERE N = '#39 + '100'#39);

То есть вместо одинарной кавычки я просто подставляю её ASCII-код. Здесь запутаться уже сложнее. В итоге в нашем примере 100 помещается в одинарные кавычки и это более понятно, чем вариант по первому способу (ну во всяком случае для меня):

WriteLn('SELECT * FROM TABLE WHERE N = ''' + '100''');

Ну а на экране наши примеры будут выглядеть примерно так:

На этом всё. Надеюсь, кому-то эти сведения пригодятся...

Вступить в группу "Основы программирования"

Подписаться на канал в РУТУБ

Подписаться на Дзен-канал

Подписаться на рассылки по программированию

Первые шаги в программирование

Очень небольшая книга, которую можно прочитать буквально за 15 минут. Но эти 15 минут дадут вам представление о том, что такое программирование. И вы даже напишите свою первую программу. Для тех, кто интересуется программированием, но ещё не знает, что это такое, и не пробовал создавать программы (или пробовал, но не получилось). Подробнее...

Помощь в технических вопросах

Помощь студентам. Курсовые, дипломы, чертежи (КОМПАС), задачи по программированию: Pascal/Delphi/Lazarus; С/С++; Ассемблер; языки программирования ПЛК; JavaScript; VBScript; Fortran; Python и др. Разработка (доработка) ПО ПЛК (предпочтение - ОВЕН, CoDeSys 2 и 3), а также программирование панелей оператора, программируемых реле и других приборов систем автоматизации. Подробнее...

Главная
Контакты