Windows 7 RC 1 wyciekł do sieci torrent

Wczoraj do sieci wyciekł windows 7 build 7100. Według numeru kompilacji 7100.0.winmain_win7rc.090421-1700. został skompilowany 21 kwietnia br. 23 kwietnia Microsoft przesłał tego builda swoim partnerom OEM oraz najważniejszym klientą. Windows 7 RC1 Microsoft udostępni na swoich serwerach 5 Maja br.

Prosty edytor tekstu w Delphi

Witam. Pokażę wam jak zrobić prosty edytor tekstuw delphi.
Na formę wrzucamy 6 buttonów ( Otwórz , Zapisz, Wytnij, Wklej, Kopiuj, Usuń) , Komponent memo wykasuwujemy jego właściwości Lines oraz zmieniamy właściwości SrcollBars na ssVertical , na formę dodajemy jeszcze OpenDialogs oraz SaveDialogs.
Tak wygląda kod :

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Buttons;

type
TForm1 = class(TForm)
BitBtn1: TBitBtn;
BitBtn2: TBitBtn;
BitBtn3: TBitBtn;
BitBtn4: TBitBtn;
BitBtn5: TBitBtn;
BitBtn6: TBitBtn;
OpenDialog1: TOpenDialog;
SaveDialog1: TSaveDialog;
Memo1: TMemo;
procedure BitBtn1Click(Sender: TObject);
procedure BitBtn2Click(Sender: TObject);
procedure BitBtn5Click(Sender: TObject);
procedure BitBtn4Click(Sender: TObject);
procedure BitBtn3Click(Sender: TObject);
procedure BitBtn6Click(Sender: TObject);
private
{ Private declarations }
public
MyFile : TextFile;
MyText : String;
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.BitBtn1Click(Sender: TObject);
var AfterD : String;

begin

Memo1.Clear;
AfterD := '';

if OpenDialog1.Execute then
begin
AssignFile(MyFile, Opendialog1.FileName);
Reset(MyFile);

while not eof (MyFile) do
Begin
Readln(MyFile, MyText);
Memo1.Lines.Add(MyText);
end;
CloseFile(MyFile)
end;

end;

procedure TForm1.BitBtn2Click(Sender: TObject);
begin
if SaveDialog1.Execute then
begin
AssignFile(MyFile, SaveDialog1.FileName);
Rewrite(MyFile);
Writeln(Myfile,Memo1.Lines.GetText);
CloseFile(MyFile);
end;
end;

procedure TForm1.BitBtn5Click(Sender: TObject);
begin
Memo1.CopyToClipboard;
end;

procedure TForm1.BitBtn4Click(Sender: TObject);
begin
Memo1.PasteFromClipboard;
end;

procedure TForm1.BitBtn3Click(Sender: TObject);
begin
Memo1.CutToClipboard;
end;

procedure TForm1.BitBtn6Click(Sender: TObject);
begin
Memo1.SelText;
end;

end.


Przerwa w pracy nad kolejną wersją RoxyPlayera

Witam , z przykrością muszę stwierdzić iż data wydania RoxyPlayera 2.16 oraz tym samym RoxyPlayera 3 opóźni się . Mój komputer uległ uszkodzeniu i konieczna była wizyta w serwisie , niestety komputer wróci do mnie za 2 tygodnie i wtedy od razu przystąpię do pracy.

Sprostowanie

Witam, chciałbym poinformować was o tym iż prace nad kolejną wersją RoxyPlayera rozpocznę jeszcze dzisiaj lub jutro. Dzisiaj mój komputer wraca z serwisu , miał tam być 2 tygodnie ponieważ wszystko wskazywało na uszkodzenie płyty głównej. Lecz okazało się że w wyniku upadku komputera nóżki procesora pokrzywiły się , na szczęście pan w serwisie wyprostował nóżki i komputer działa.

Życzenia Wielkanocne

Smacznego jajka, Świąt jak z bajki

I niech Wam zając przyniesie podarki.

Pięknej święconki, udanych wypieków

Żeby ten czas był najmilszy na świecie.

I taka tradycja jest w tym kraju

Żeby w śmigusa Was zmoczyć miało.

Wycieki buildów windows 7 z Microsoftu

Witajcie Ostatnio dużo buildów  windows 7 wycieka z Microsoftu , ostatnim buildem który wyciekł w wersji 32 bitowej jest 7077 który jest wersją RC Escrow czyli prawie gotową wersją RC . Wczoraj między godziną 21 a 22 w sieciach torrent pojawiła się 64 bitowa wersja tego builda. Aktualnie po Microsofcie krążą dwa buildy są to 7079 oraz 7105 . Build 7105 zapewne jest gotową wersją RC , co pozwala nam twierdzić że windows 7 RC będzie do pobrania jeszcze w tym miesiącu ( najprawodpodbniej za tydzień ). Jak widać Microsoft mocno podkręcił tępo swoich prac i tu możemy zadać pytanie kiedy premiera windows 7 ? Moim zdaniem wersja RTM wyjdzie na przełomie września i października , a sama premiera odbędzie się podczas PDC 2009 ( Professional Developers Conference ) . Microsoft wciąż nie podaje daty premiery i ciągle twierdzi że premiera windows 7 odbędzie się trzy lata po premierze Visty czyli w 2010 roku , moim zdaniem microsoft może mieć podczas PDC wersję finalną windows 7 ale z premierą może poczekać do 2010 roku.

Sprostowanie

Witam , chciałbym Was przeprosić za bzdury jakie napisałem o buildzie 7105 i wersji RC windows 7 . Build 7106  jest najnowszym buildem który kraży po sieci , niestety jest on w chińskiej wersji. Co do wydania wersji RC windows 7 to nie zostanie ona wydana publicznie w tym miesiacu ( kwietniu ) lecz najprawdopodbniej na poczatku maja. Jeszcze raz przepraszam was za te bzdury o buildzie 7105 .

RoxyPlayer 3

Związku z tym że postanowiłem kolejną część swojego odtwarzacza napisać  od początku napisać , jego premiera opóźni się i to znacznie. Co było powodem tej decycji ? Podobno kod źródłowy podobnego odtwarza krąży po sieci . RoxyPlayer 2.16 również wydam później ( mniej więcej za 2 tygodnie ) , ta wersja będzie mieć część funkcji które będzie mieć trzecia wersja. Napewno zmieni się wygląd oraz wszystkie wykryte bugi w 2 wersji zostaną usunięte