Skocz do zawartości

ULLISSES

Stały użytkownik
  • Postów

    11277
  • Dołączył

  • Ostatnia wizyta

  • Wygrane w rankingu

    31

Treść opublikowana przez ULLISSES

  1. ULLISSES

    Pliki Ini

    Odczyt: procedure TfrmMain.ReadConfiguration;var configIni: TIniFile; i: integer;begin ConfigIni := TIniFile.Create(ExtractFilePath(ParamStr(0)) + 'config.ini'); with configIni do begin// Seckcja : Maincr:= StrToInt(ReadString('Main', 'Last','1'));// Sekcja: AC 1for i:=1 to 8 dobeginac[i]:= TKonto.Create;ac[i].Pop3_n := ReadString('ac'+IntToStr(i), 'Pop3_ServerName', 'pop3.serwer.pl');ac[i].Pop3_p := StrToInt(ReadString('ac'+IntToStr(i), 'Pop3_ServerPort', '110'));ac[i].Pop3_us := ReadString('ac'+IntToStr(i), 'Pop3_ServerUser', 'login');ac[i].Pop3_pd := ReadString('ac'+IntToStr(i), 'Pop3_ServerPassword', 'password');ac[i].Smtp_n := ReadString('ac'+IntToStr(i), 'Smtp_ServerName', 'smtp.serwer.pl');ac[i].Smtp_p := StrToInt(ReadString('ac'+IntToStr(i), 'Smtp_ServerPort', '25'));ac[i].Smtp_us := ReadString('ac'+IntToStr(i), 'Smtp_ServerUser', 'login');ac[i].Smtp_pd := ReadString('ac'+IntToStr(i), 'Smtp_ServerPassword', 'password');ac[i].Smtp_au := ReadInteger('ac'+IntToStr(i), 'SMTPAuthenticationType', 0);ac[i].U_email := ReadString('ac'+IntToStr(i), 'PersonalEmail', 'to_ja@poczta.pl');end; end; configIni.Free;end; Zapis: procedure TfmSetup.BitBtn1Click(Sender: TObject);var configIni: TIniFile; i: integer;begin configIni := TIniFile.Create(ExtractFilePath(ParamStr(0)) + 'config.ini'); with configIni do begin for i:=1 to 8 do begin WriteString('Main', 'Last', IntToStr(frmMain.cr)); WriteString('ac'+IntToStr(i), 'Pop3_ServerName', ac[i].Pop3_n); Pop3ServerName := POPServer.Text; WriteString('ac'+IntToStr(i),'Pop3_ServerPort', IntToStr(ac[i].Pop3_p)); Pop3ServerPort := StrToIntDef(POPPort.Text, 110); WriteString('ac'+IntToStr(i),'Pop3_ServerUser', ac[i].Pop3_us); Pop3ServerUser := Account.Text; WriteString('ac'+IntToStr(i),'Pop3_ServerPassword', ac[i].Pop3_pd); Pop3ServerPassword := Password.Text; WriteString('ac'+IntToStr(i),'Smtp_ServerName', ac[i].Smtp_n); SmtpServerName := SMTPServer.Text; WriteString('ac'+IntToStr(i),'Smtp_ServerPort', IntToStr(ac[i].Smtp_p)); SmtpServerPort := StrToIntDef(SMTPPort.Text, 110); WriteString('ac'+IntToStr(i),'Smtp_ServerUser', ac[i].Smtp_us); SmtpServerUser := edtAccount.Text; WriteString('ac'+IntToStr(i),'Smtp_ServerPassword', ac[i].Smtp_pd); SmtpServerPassword := edtPassword.Text; WriteInteger('ac'+IntToStr(i),'Smtp_SMTPAuthenticationType', ac[i].Smtp_au); SmtpAuthType := cboAuthType.ItemIndex; WriteString('ac'+IntToStr(i),'PersonalEmail', ac[i].U_email); UserEmail := Email.Text; LoadSett; end; end; configIni.Free;end; config.ini: [Main]Last=1[ac1]Pop3_ServerName=pop3.serwer.plPop3_ServerPort=110Pop3_ServerUser=loginPop3_ServerPassword=passwordSmtp_ServerName=smtp.serwer.plSmtp_ServerPort=25Smtp_ServerUser=loginSmtp_ServerPassword=passwordSmtp_SMTPAuthenticationType=0PersonalEmail=to_ja@poczta.pl[ac2]Pop3_ServerName=pop3.serwer.plPop3_ServerPort=110(..) Kod pochodzi z mojego programiku Minimail. Oczywiście kont jest 8 - wypisałem kawałek config.ini, bo wypisywanie kilka razy tego samego nie ma sensu. "Last" określa numer ostatnio używanego konta.
  2. if(warunek){blareturn cos2break;
  3. 1. To rzeczywiście są podstawy. Jak Ty się uczysz tego programowania? Na wyczucie?? 2. Ściagnij sobie kilka kursów/książek z netu i przestań zadawać takie pytania.
  4. 1. Spylon: Doczytałeś posta do końca? Poza tym na cholere mu SB Live. 2. r0bu$: Masz coś nie tak z gniazdem na płycie albo z wtyczką. Podłącz głośniki do innego sprzętu i sprawdź. Jeśli będzie ok, to spróbuj inne głośniki podłączyć do kompa. Czy wtyczka na pewno dochodzi do końca? Jeśli tak, to czy styka się metalową powierzchnią z zaślepką obudowy? Jeśli tak, to nie powinna - spróbuj podłączyć głośniki przez przedłużacz.
  5. ULLISSES

    Services.msc

    Najlepiej włącz wszystkie usługi i powinno pomóc. Inna bajka, że kiedyś też tak sobie zrobiłem - DX nie chciał się instalować. Niestety włączenie usług nie pomogło, bo pewnie wywaliłem coś za dużo z Windowsa. Skończyło się na formacie, bo i tak system lekko zapchany był.
  6. Sprawdzałeś wcześniej taśmę, zasilacz, ustawienia bios, temperaturę? Pytam, bo zastanawia mnie Twoja pewność co do winy dysku.
  7. ULLISSES

    Wolny Win

    ... albo program antywirusowy :) Taki Kaspersky czy inny kombajnik potrafi skutecznie spowolnić nawet całkiem mocny sprzęt. Odinstaluj antywiry i firewalle, włącz awaryjny z obsługą sieci + AdAware + MKS Online. BTW: Przed wyłączeniem/deinstalacją firewalla upewnij się, że masz SP2. Inaczej może być nieciekawie :)
  8. No to WDCLAER lub jakiś diagnostyczny od producenta. Jeśli nie pomoże, to dysk do reklamacji, bo pewnie nowy jest.
  9. Najpierw odzyskiwanie - szukaj na forum, bo różni ludzie różne programy polecają :) Potem HDD Regenerator lub WDCLEAR. Na koniec zakładanie partycji FDISKiem, na FAT32 i skanowanie dokładne Scandiskiem. Jak nic nie znajdzie, to mozesz wywalić partycje, założyć instalatorem 2K/XP/2K3 i wrzucić jakiś system, bo na 99% dysk jest OK :)
  10. Whatever.. Przeinstaluj sterowniki. Jeśli nie pomoże, to szukaj oddzielnych sterów do USB - info znajdziesz na CD do mobo w katalogu USB. Ostatecznie reinstal/naprawa Windows.
  11. Niech zgadne... nForce? Sterowniki do płyty głównej zainstaluj/przeinstaluj, bo "Nieznane urzadzenie" na "uniwersalnej magistrali szeregowej" oznacza, że USB nie jest zainstalowane poprawnie.
  12. Ja pamiętam. Za Chiny ludowe nie mam pojęcia, jak oni to zrobili. Tam naprawdę nie ma miejsca na żadne sztuczki i grę świateł... Najbardziej denerwujący jest w takich sztuczkach fakt, że widzisz coś na własne oczy, wydaje się to skrajnie realne, ale logika i prawa fizyki podpowiadają Ci, że to co widzisz nie istnieje, nie ma prawa bytu.
  13. Przejechać programem WDCLEAR (kasuje wszelkie dane), założyć partycje instalatorem Windows (lub fdiskiem) od nowa i modlić się, że wszystko będzie ok. Dla pewności można Scandisk dokładny zapuścić (ze skanowaniem powierzchni).
  14. ULLISSES

    Edukacja.

    Język: C/C++ i wstawki ASM (dla Dos), dowolny język (dla Windows) Źródło wiedzy: Anatomia PC (wydawnictwa Helion)
  15. ULLISSES

    Wolny Win

    1. Było, szukaj! 2. Było, szukaj!! 3. Było, szukaj!!! I chyba jest o tym TOPIK PRZYKLEJONY! Że o dziale FAQ nie wspomnę! Ewentualnie tak, jak ja się uczyłem: metoda prób i błędów - po 100 instalacji rozwalonego systemu będziesz wiedział, czego robić nie należy :D
  16. CRC tu suma kontrolna. Jeśli masz taki komunikat, to coś jednak jest nie tak. Przejedź pamięci programem GoldMemory. Może sprzęt masz za bardzo wykręcony. Dziwne jest tylko to, iż wg Ciebie plik jest OK.
  17. ULLISSES

    Seriale

    Czy to jest to samo, co "Cudowne lata siedemdziesiąte" (czy jakos tak) ? Jeśli tak, to kojarze ten serial - leciał okolo 22:35 na Wizja 1 czy jakoś tak. Bardzo ciekawy i zabawny, ale częściowo oglądałem dla tej fajnej panienki :)
  18. Da się.. Porozrzucać zawarte w nim pliki do kilku folderów, ale powodzenia przy składaniu. Albo spakować folder i wtedy podzielić.
  19. Total Commander -> Plik-> Podziel plik
  20. A ścieżki w kompilatorze? Options->Directories i tam się ścieżki ustawia. Ustaw odpowiednią ścieżkę do UNITS i powinno smigać :)
  21. Opcja: Boot Up Floppy Seek na Disabled, ale to jest zaraz przed/po BEEP z POSTa. http://www.ssi.civ.pl/bios/bios_features_setup.php To, o czym mówisz nie powinno występować. Owszem, była taka opcja do wyłączenia w Windows, ale w wersji 9x... Jak nie używasz dyskietki i chcesz ją wyłączyć, to wyłącz KONTROLER w BIOSie: Onboard FDC Controller na Disabled http://www.ssi.civ.pl/bios/integrated_peripherals.php
  22. ULLISSES

    Seriale

    Gliniarz i prokurator - raz bolała mnie głowa i zacząłem oglądać serialik, bo właśnie lecial (8 wieczorem). Gdy się skończył, to głowa już mnie nie bolala :) Crime Story, Kojak, Świat wg Bundy-ch - hehe, stare ale jare.. Jezioro marzeń - mniam :) Kiedy i na czym leci FastLine? Widziałem kiedyś raz i nawet niezłe. Tylko nie mówcie, że Polsat.. bo moja naziemna antena łapie tylko kanały z Norwegii - cały czas śnieg pada :) A Cyfra nie daje Polsatu. Btw: Fastline kojarzy mi się z VIP, nie wiem dlaczego
  23. A jak to sprawdziłeś? Usunąłeś 2 partycje, które miałes i utworzyłeś 1 pustą?? Jeśli tak, to bez sensu. Zauważ, iż 2 partycje na dużym dysku od nowości to juz tak pofragmentowane były, że każdy plik powyżej 1MB mógł się dzielić nawet na 100 części. Wywaliłeś wszystko, zrobiłeś pustą ładną partycję i się dziwisz, że się poprawiło... IMO: Aby program mógł testować dysk, musi "trochę" danych zapisać, co przy znacznej fragmentacji sprowadza się do szukania wolnego kawałka dysku, gdzie mozna upchnąć dane... To by wyjaśniło skoki wykresu - gdy jest na górze, to znaczy, że zapisuje z pełną prędkością; gdy są spadki, to nie zapisuje, lecz szuka kolejnego wolnego miejsca.. kilkaset MB dalej. Ale mogę się mylić :)
  24. AFAIK jest to plik, gdzie zapisane są miniaturki obrazków (cache). Jak to usuniesz, to przy ponownym wejściu do katalogu z widokiem miniatur system będzie powoli ładował miniaturki, bo będzie musiał od nowa je wygenerować.
  25. I pewnie jeszcze świeci się dioda na płycie głównej..? Tak ma być.. na niektórych płytach - np Epox :D
×
×
  • Dodaj nową pozycję...