Как проверить радиокнопку на активность.

@Alex140679 · Регистрация: 15.03.2009

Студворк — интернет-сервис помощи студентам

приветик! Ребята ,
Как проветить радиокнопку на активность.
нужен код на delphi

@Monte-Cristo · 15.03.2009, 21:42

Delphi
1
if RadioButton1.Checked=true then ShowMessage('Активна');

@Alex140679 · 15.03.2009, 22:59 **[ТС]**

спасибо!!!!!!!!!!юОчень большое!!!!!!!!!!!

@Alex140679 · 15.03.2009, 23:43 **[ТС]**

помогите начинающему

сложил прогу которая считывает с combobox, edit, memo(системное время и дата) и выводит эти даные в текстовий файл rez.txt
при открытии файла rez.тхт выводит сообщение rez.txt бинарный файл. продолжить?
но у файле получаем

@Monte-Cristo · 15.03.2009, 23:49

покажи функцию записи в файл

@Alex140679 · 15.03.2009, 23:55 **[ТС]**

Delphi
1
2
3
4
5
6
7
8
AssignFile(f_rez,'rez.txt'); 
{$I-} 
rewrite(f_rez); append(f_rez);
{$I+} 
writeln(f_rez,pr); 
writeln(f_rez,im);
writeln(f_rez,kl);
writeln(f_rez,parol);

@Monte-Cristo · 16.03.2009, 00:04

во-первых, зачем ты делаешь append если сделал rewrite??

во-вторых, pr, im, kl, parol, переменные каких типов?
и как ты их приводишь?

@Alex140679 · 16.03.2009, 00:14 **[ТС]**

Delphi
1
2
3
4
5
6
var PR,IM,KL,PAROL:STRING[20];
......
parol:=edit4.Text;
timedate:=memo1.Text;
pr:=combobox3.Text
kl:=combobox2.Text;

@Monte-Cristo · 16.03.2009, 00:19

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

@Alex140679 · 16.03.2009, 00:29 **[ТС]**

как сделать так чтобы программы не было видно на панели задач?

Добавлено через 5 минут 27 секунд
Don Corleone! Может это быть из-за

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
procedure TForm1.Memo1Click(Sender: TObject);
var
lt : TSYSTEMTIME;
 
begin
memo1.Clear;
GetLocalTime(lt);
Memo1.Lines.Add('Дата: ' +
IntToStr(lt.wmonth) + '/' +
IntToStr(lt.wDay) + '/' +
IntToStr(lt.wYear) + ' ' +
' Час: '+
IntToStr(lt.wHour) + ':' +
IntToStr(lt.wMinute) + ':' +
IntToStr(lt.wSecond));
end;

(бинарный файл??????)

Добавлено через 2 минуты 41 секунду
потому что ни времени ни даты не видно в текстовом

@Monte-Cristo · 16.03.2009, 00:36

невидимость:

Delphi
1
ShowWindow(Application.Handle,SW_HIDE);

Добавлено через 2 минуты 43 секунды
а с датой/временем по-моему лучше в твоем случае так:

Delphi
1
2
Memo1.Lines.Add(TimeToStr(Now()));
Memo1.Lines.Add(DateToStr(Now()));

@Alex140679 · 16.03.2009, 00:56 **[ТС]**

дата и время: NOW() что там писать?
ShowWindow(Application.Handle,SW_HIDE); - где прописывать

@Monte-Cristo · 16.03.2009, 11:38

в FormActivate

Delphi
1
ShowWindow(Application.Handle,SW_HIDE);

в Now() ничего не писать... то рабочий код возвращающий текущее время

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .

@Alex140679 0 / 0 / 0 Регистрация: 15.03.2009 Сообщений: 9

	Как проверить радиокнопку на активность. 15.03.2009, 21:33. Показов 1622. Ответов 12 Метки нет (Все метки) приветик! Ребята , Как проветить радиокнопку на активность. нужен код на delphi 0

@Alex140679 0 / 0 / 0 Регистрация: 15.03.2009 Сообщений: 9
	15.03.2009, 22:59 [ТС]
	спасибо!!!!!!!!!!юОчень большое!!!!!!!!!!! 0

@Alex140679 0 / 0 / 0 Регистрация: 15.03.2009 Сообщений: 9
	15.03.2009, 23:43 [ТС]
	помогите начинающему сложил прогу которая считывает с combobox, edit, memo(системное время и дата) и выводит эти даные в текстовий файл rez.txt при открытии файла rez.тхт выводит сообщение rez.txt бинарный файл. продолжить? но у файле получаем Миниатюры 0

@Monte-Cristo 2816 / 1408 / 107 Регистрация: 07.03.2009 Сообщений: 4,446
	15.03.2009, 23:49
	покажи функцию записи в файл 0

@Monte-Cristo 2816 / 1408 / 107 Регистрация: 07.03.2009 Сообщений: 4,446
	16.03.2009, 00:04
	во-первых, зачем ты делаешь append если сделал rewrite?? во-вторых, pr, im, kl, parol, переменные каких типов? и как ты их приводишь? 0

@Monte-Cristo 2816 / 1408 / 107 Регистрация: 07.03.2009 Сообщений: 4,446
	16.03.2009, 00:19
	ну тут вроде прально... ошибка или в реализации где-то... или может шрифты у тебя в системе глючит... 0

@Alex140679 0 / 0 / 0 Регистрация: 15.03.2009 Сообщений: 9
	16.03.2009, 00:56 [ТС]
	дата и время: NOW() что там писать? ShowWindow(Application.Handle,SW_HIDE); - где прописывать 0