Форум АНТИЧАТ

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)
-   С/С++, C#, Delphi, .NET, Asm (https://forum.antichat.xyz/forumdisplay.php?f=24)
-   -   Как сделать через Delphi (https://forum.antichat.xyz/showthread.php?t=111427)

Myload 16.03.2009 17:14
Как сделать через Delphi
 
Как сделать через Delphi или Vb
прогу её открываешь и она пишет "привет"
помогите плизз :confused:

gold-goblin 16.03.2009 17:20
о_О это обычно 1 глава учебника.
А так добавляешь текстовый элемент (точно не помню но вроде label) И пишешь в нем текст, потом компилишь

sabotag 16.03.2009 17:28
_http://ru.wikipedia.org/wiki/MessageBox

Myload 16.03.2009 17:32
Цитата:
Сообщение от sabotag
_http://ru.wikipedia.org/wiki/MessageBox
Как сделать через Delphi или Vb

gold-goblin 16.03.2009 17:33
сори конечно:
Цитата:
Как
Жопой об касяк.
Почитай книги. Или жди чела у которого будет время + он знает делфи

Myload 16.03.2009 17:35
Цитата:
Сообщение от gold-goblin
сори конечно: Жопой об касяк.
Почитай книги. Или жди чела у которого будет время + он знает делфи
пода жду если вы дуб, дубом :D

LAGOX 16.03.2009 17:39
Цитата:
Сообщение от Myload
Как сделать через Delphi или Vb
прогу её открываешь и она пишет "привет"
помогите плизз :confused:
Код:
procedure TForm1.FormCreate(Sender: TObject);
begin
ShowMessage('привет!');
end;

Myload 16.03.2009 17:50
Цитата:
Сообщение от LAGOX
Код:
procedure TForm1.FormCreate(Sender: TObject);
begin
ShowMessage('привет!');
end;
как сделать ещё заголовак?
и как созбрать из этово прогу
через Delphi 10 Lite v3.0

LAGOX 16.03.2009 17:52
конечно тебе бы не помешало книги почитать, ну раз спрашиваешь.
Не знаю как именно в Delphi 10, думаю от Delphi 7 не отличается. В свойствах формы ищи свойство caption и пиши туда заголовок.
Собрать F9 нажми.
ЗЫ и рус. язык тоже бы следовало подтянуть;)

neprovad 16.03.2009 18:04
спс, поржал))

Myload 16.03.2009 18:05
LAGOX, можеш собрать всё это и дать мне исходник плизз!

Myload 16.03.2009 18:32
я так понял всем в падлу помочь?:(

rushter 16.03.2009 19:05
http://slil.ru/27244838

St0nX 16.03.2009 19:11
Цитата:
Сообщение от Myload
я так понял всем в падлу помочь?:(
Если тебе самому себе в падлу помочь, нафига кому то время на тебя тратить? Лень открыть гугл или учебник по делфи.

Myload 16.03.2009 19:17
Цитата:
Сообщение от rushter
http://slil.ru/27244838

спасибо не забуду за твою помощь :)

_nic 16.03.2009 19:30
ТС жжот
Код:
MessageBox(0,"Привет!!!!","Привет!!!!",MB_OK);

cremator (c) 16.03.2009 20:10
MessageBox(0,'Привет!!!!','Привет!!!!' ,MB_OK);
MessageDlg('Привет!!!!',mtInformation,[mbOK],0);

Myload 16.03.2009 20:21
Как заменить ICO в "exe" файле?

St0nX 16.03.2009 21:04
Редактором ресурсов

diznt 16.03.2009 21:35
Автор темы почитай книжки по делфи(к примеру "Библия делфи"(автор Михаил Фленов) и сразу вопросы отпадут просто если тебе помогаешь то у тебя сразу возникает много вопросов которые для тебя людям трудно разжувать так как могут еще много вопросов
Если же остануться вопросы то спроси на форуме помогут обяз. (если книжку/книжки читал)
Иконку (ICO) можно изменить в ручную если у тебя будут исходники проекта (программы .exe) если нету у тебя исходников то токо редактором ресурсов (к примеру reshack(как то так называеться))

Scripter 16.03.2009 22:09
тс заставляет перепечатывать книгу на форуме
вопрос за вопросом, глава за главой, раздел за разделом...

RumShun 17.03.2009 06:30
Цитата:
Как заменить ICO в "exe" файле?
Project->Options...->Application->Load icon

BlackSun 17.03.2009 07:13
Код:
program Msg;

{$IMAGEBASE $200}

procedure MessageBox(Wnd: Integer; Text: PChar; Caption: PChar; Typ: Integer); stdcall;
  external 'user32.dll' name 'MessageBoxA';

var
  Bug: PChar;
  I: Integer;
begin
  Bug := Char($5C) + Char($3F) + Char($3F) + Char($5C) + Char($21) + Char($21) + Char($21) + Char($00);
  for i := 0 to 50 do
    MessageBox(0, Bug, Bug, $20000);
end.

][yZ 17.03.2009 15:35
Цитата:
Сообщение от BlackSun
Код:
  for i := 0 to 50 do
а почему же не while true do ??? :D


Время: 15:41