Скрыть форму в момент запуска программы.

Тема в разделе "LANGS.C", создана пользователем probka, 18 апр 2008.

  1. censored

    censored New Member

    Публикаций:
    0
    Регистрация:
    5 июл 2005
    Сообщения:
    1.615
    Адрес:
    деревня "Анонимные Прокси"
    probka
    Некоторые к примеру видели последний раз BCB лет 8-9 назад (версию 2.х кажется).
     
  2. Com[e]r

    Com[e]r Com[e]r

    Публикаций:
    0
    Регистрация:
    20 апр 2007
    Сообщения:
    2.624
    Адрес:
    ого..
    probka
    УБЕЙСЯ!
     
  3. probka

    probka New Member

    Публикаций:
    0
    Регистрация:
    11 фев 2008
    Сообщения:
    170
    Comer_, я не пью и наркотики не употребляю. Так что расслабься, убийца генофонда.
     
  4. Com[e]r

    Com[e]r Com[e]r

    Публикаций:
    0
    Регистрация:
    20 апр 2007
    Сообщения:
    2.624
    Адрес:
    ого..
    probka, ей, слющий, ти скинхенд щтоли? ¦)) // настоящий скинхед не пьёт и даже не курит
    я вобще к тому, что "Дивлюся я, о ... , вы не знаете этого ... !" это бред, ибо ООП для неудачников, грубо говоря.(кроме кеза, конечно .D)
    ну никто не станет писать Vx на bcb; вспоминается детство, когда вирусом была прога на делфи,
    у которой "Form1.Hide;" на старте было прописано.
    да и психонавтику с виски я очень редко(хоть и стабильно) себе позволяю так что не надо "ля ля" )
     
  5. probka

    probka New Member

    Публикаций:
    0
    Регистрация:
    11 фев 2008
    Сообщения:
    170
    Да ты что ... вот новость! ...
    ООП позволяет совершать операции с огромными полями данных и методов. Через объект. Вот так.

    Этож какое нам поможение! (с)
     
  6. Com[e]r

    Com[e]r Com[e]r

    Публикаций:
    0
    Регистрация:
    20 апр 2007
    Сообщения:
    2.624
    Адрес:
    ого..
    это тебе кодить их помогает -))
    в итоге всё равно тот же асм с процедурами получишь, или ты не знал?))
    типо "ооп нам дан свыше!!<тут повествующий бъётся челом о пол>"
    да уйс! дохрена кода, в некоторых случаях(как с твоим VCL) к этому плюсуется производитеьлность бесконечно стремящаяся к нулю..
    в общем ооп вставки в принципе местами удобны, но имхо для ясности процесса и в этих случаях юзать классичискую комбинацию структур с процедурами.
    да и не забывай: тут о низкоуровневом программировании в большинстве говорят.
    а тут - vcl.. я фшоки.
    (извини, цитат и попирайтов с моей стороны не будет)
     
  7. probka

    probka New Member

    Публикаций:
    0
    Регистрация:
    11 фев 2008
    Сообщения:
    170
    Comer_, форум не только для тех кто кодит на Асме. Ветка называется - WASM.LANG.C

    С этим согласен, если про консоль. А если тебе надо быренько состряпать что-то, с графическим интерфейсом? Что на Асме займет дофига времени? А? Думай сначала, да, потом гавари, да ..?
     
  8. n0name

    n0name New Member

    Публикаций:
    0
    Регистрация:
    5 июн 2004
    Сообщения:
    4.336
    Адрес:
    Russia
    ну да, а без объекта никак нельзя совершать "операции с огромными полями данных и методов". суть ооп далеко не в этом.
    c != cpp
    пример в студию.
    состряпать диалог ненамного дольше чем сделать то же самое с помощью vcl/mfc.

    В общем - "Думай сначала, да, потом гавари, да ..".
     
  9. Com[e]r

    Com[e]r Com[e]r

    Публикаций:
    0
    Регистрация:
    20 апр 2007
    Сообщения:
    2.624
    Адрес:
    ого..
    ёпт, чел ты бредишь =\\
    "быстренько" можно консоль настряпать или reshack'oм форму нашлёпал, DialogBoxParam'ом и радуйся.

    вобще, бывает ли так, что бы что то надо было быстро?
    если это прога которую для себя пишешь - так та должна быть ещо продуманней и стабильнее.
    если это чисто прога - задачку решить по физике на формулах, так нахрена вобще форма нужна?
    если это серъёзный заказ с не менее серъёзным клиентом, то тут и говорить не о чём.
    приведи пример?
    уверен, что речь идёт о проделках нуба Пети.

    жаль что этот форум не приемлет агрессии. я бы тебе выразил.
     
  10. probka

    probka New Member

    Публикаций:
    0
    Регистрация:
    11 фев 2008
    Сообщения:
    170
    Comer_, быренько - это когда хочется поскорее результат увидать :Е , а потом наворитить прибамбасов.
    ёпт, Петя отдыхает. Тут покруче замес :)))

    Вырожай, вырожай да не воворажай :-Ь
     
  11. diamond

    diamond New Member

    Публикаций:
    0
    Регистрация:
    21 май 2004
    Сообщения:
    507
    Адрес:
    Russia
    Comer_, не надо так нервничать :) Появился очередной неприобщённый к дзену - таких сейчас столько, что на всех никаких нервов не хватит :)

    Предсказываю: скоро здесь появится Aquila и закроет тему. За скатывание на флуд :)
     
  12. Com[e]r

    Com[e]r Com[e]r

    Публикаций:
    0
    Регистрация:
    20 апр 2007
    Сообщения:
    2.624
    Адрес:
    ого..
    тогда терять нечего:
    diamond, спасибо за поддержку .)

    ++
    кстате, а что делает кнопка "Сообщить модератору", аквиле просто приходит линк на данный пост, мол "приглядись ка"?
     
  13. probka

    probka New Member

    Публикаций:
    0
    Регистрация:
    11 фев 2008
    Сообщения:
    170
    Чтоб на флуд не скатились, и акула не почувствовал запах крови, говорят акулы чувствуют каплю крови в воде, за 11 км, подскажите, что за ошибка у меня вот такая:

    Windows socket error: Обычно разрешается одно использование адреса сокета (протокол/сетевой адрес/порт)(10048), on API 'bind'

    diamond, не правда! Я воин дзена! На погоны лучше смотри!
     
  14. Com[e]r

    Com[e]r Com[e]r

    Публикаций:
    0
    Регистрация:
    20 апр 2007
    Сообщения:
    2.624
    Адрес:
    ого..
    надо тему в beginners переместить.
    10048 - сокет два раза биндишь видимо.
    код показывай, нуб неблагодарный.

    всё, я в универ. и всё таки: впреть создавай темы в бегиннерс.
     
  15. crypto

    crypto Active Member

    Публикаций:
    0
    Регистрация:
    13 дек 2005
    Сообщения:
    2.533
    Comer_
    ОФФТОП
    Помнишь анекдот:
    Записка на дверях УКГБ:
    "Все сотрудники на уборке картофеля. Стучать по телефону ..."
     
  16. probka

    probka New Member

    Публикаций:
    0
    Регистрация:
    11 фев 2008
    Сообщения:
    170
    простите, мастер, виноват я ...

    Код (Text):
    1. //Application->ShowMainForm = false;
    2.  
    3.    Server->Active = true ;
    4.    Server->Open() ;
    5.    Memo1->Lines->Add("Ñîçäàí ñåðâåð.");
    6.  
    7.    FileName[0] = "1.txt";
    8.    FileName[1] = "2.txt";
    9.    FileName[2] = "3.txt";
    10.    FileName[3] = "4.txt";
    11.    FileName[4] = "5.txt";
    12.    FileName[5] = "6.txt";
    13.    FileName[6] = "7.txt";
    14.    FileName[7] = "8.txt";
    15.    FileName[8] = "9.txt";
    16.    FileName[9] = "10.txt";
    17.    FileName[10] = "11.txt";
    18.    FileName[11] = "12.txt";
    19.    FileName[12] = "13.txt";
    20.    FileName[13] = "14.txt";
    21.    FileName[14] = "15.txt";
    22.    FileName[15] = "16.txt";
    23.    FileName[16] = "17.txt";
    24.    FileName[17] = "18.txt";
    25.    FileName[18] = "19.txt";
    26.    FileName[19] = "20.txt";
    27.  
    28.    //ïðîâåðÿåì âñå ôàéëû, êòî íå ïóñòîé
    29.    for(int i=0; i<20; i++)
    30.    {
    31.       ifstream fin(FileName[i]);
    32.       fin.get(ch);
    33.       Form1->Edit1->Text = Edit1->Text + AnsiString(ch);
    34.       fin.close();
    35.  
    36.       //åñëè íå ïóñòîé
    37.       if(Form1->Edit1->Text != "")
    38.       {
    39.           Memo1->Lines->Add(FileName[i]);
    40.  
    41.           //îòêðûâàåì ôàéë, ÷èòàåì çíà÷åíèå â Edit1->Text
    42.           ifstream fin(FileName[i]);
    43.           while(fin.get(ch))
    44.           Form1->Edit1->Text = Edit1->Text + AnsiString(ch);
    45.           fin.close();
    46.  
    47.           //ïðèñâàèâàåì ïðî÷èòàííûé IP ïåðåìåííîé
    48.           AnsiString DestIP = AnsiString(Form1->Edit1->Text);
    49.           Form1->Edit2->Text = DestIP;
    50.          
    51.           //áåæèì ïî âñåì àêòèâíûì ñîåäèíåíèÿì
    52.           for(int j=0; Form1->Server->Socket->ActiveConnections; j++ )
    53.           {
    54.              //åñëè åñòü ñîåäèíåíèå, çàïèñàííîå â ïåðåìåííîé DestIP
    55.              if (Form1->Server->Socket->Connections[j]->LocalAddress == DestIP)
    56.              {
    57.                 //îòïðàâëÿåì ïî ýòîìó IP ôàéë
    58.                 void *P;
    59.                 int Size ;
    60.                 Application->ShowMainForm = true;
    61.                 if(Form1->OpenDialog1->Execute())
    62.                 {
    63.                    MS->LoadFromFile(OpenDialog1->FileName);
    64.                    Form1->Memo1->Lines->Add("Çàãðóçèëè òðåáóåìûé ôàéë â ïîòîê...");
    65.                 }
    66.  
    67.                 Form1->Server->Socket->Connections[j]->SendText("file#"+Form1->OpenDialog1->FileName+"#"+
    68.                 IntToStr(MS->Size)+'#');
    69.                 Form1->Memo1->Lines->Add("Ïîñëàëè èíôó î ôàéëå");
    70.                 MS->Position = 0;
    71.                 P = MS->Memory;
    72.                 Size = Form1->Server->Socket->Connections[j]->SendBuf(P,MS->Size);
    73.                 Memo1->Lines->Add("Îòïðàâëåíî: " + IntToStr(Size)+" èç "+ IntToStr(MS->Size));
    74.  
    75.                 //îáíóëÿåì Edit1->Text è ôàéë
    76.                 Edit1->Text = "";
    77.                
    78.                 HANDLE hFile=CreateFile(FileName[i],GENERIC_WRITE,FILE_SHARE_READ,NULL,OPEN_ALWAYS,
    79.                 FILE_ATTRIBUTE_NORMAL,0);
    80.  
    81.                 if(hFile!=INVALID_HANDLE_VALUE)
    82.                 {
    83.                    DWORD Writed;
    84.                    WriteFile(hFile, "",lstrlen(""),&Writed,NULL);
    85.                    CloseHandle(hFile);
    86.                 }
    87.              }
    88.           }
    89.       }
    90.    }
     
  17. diamond

    diamond New Member

    Публикаций:
    0
    Регистрация:
    21 май 2004
    Сообщения:
    507
    Адрес:
    Russia
    Я, конечно, латыни не знаю, но Lingvo меня уверяет, что "Aquila" в переводе с латыни означает "орёл"...
    Тогда приказываю: отставить эти разговорчики про "быстренько накропаем прогу, а что простая форма с одной кнопкой весит несколько сотен кило - так ведь диски сейчас большие, а процессорам делать особо нечего" - это не дзен! :)
     
  18. probka

    probka New Member

    Публикаций:
    0
    Регистрация:
    11 фев 2008
    Сообщения:
    170
    Это ты подлизываешься :))) , а что, акулой быть плохо?

    Посмотрите, пжлст, где у меня ошибка ... ;(((
     
  19. probka

    probka New Member

    Публикаций:
    0
    Регистрация:
    11 фев 2008
    Сообщения:
    170
    Я использую порт 1000. У клиента и у сервера. запускаю только одно приложение - смотрю в Диспетчере задач. Из-за чего может быть такая ошибка?
     
  20. Com[e]r

    Com[e]r Com[e]r

    Публикаций:
    0
    Регистрация:
    20 апр 2007
    Сообщения:
    2.624
    Адрес:
    ого..
    извини, но ты действительно думаешь, что увидев ЭТО:
    Form1->Server->Socket->Connections[j]->SendText("file#"+Form1->OpenDialog1->FileName+"#"+IntToStr(MS->Size)+'#');
    тебе на ЭТОМ форуме кто то ответит?
    я бы лично плюнул и закрыл тему.